[go: up one dir, main page]

login
A324727
Odd numbers such that 2n is equal to A318466(n), bitor(2*n,sigma(n)), where bitor is A003986.
7
3, 7, 15, 21, 31, 55, 57, 63, 93, 105, 111, 127, 171, 189, 201, 213, 215, 217, 231, 237, 249, 253, 255, 315, 351, 357, 363, 369, 381, 393, 447, 465, 469, 473, 483, 489, 497, 501, 511, 651, 705, 747, 759, 789, 813, 831, 833, 879, 889, 895, 917, 959, 987, 989, 1001, 1015, 1023, 1155, 1365, 1377, 1407, 1467, 1491, 1503, 1505, 1515, 1533, 1595
OFFSET
1,1
MATHEMATICA
Select[Range[1, 2000, 2], 2*# == BitOr[2*#, DivisorSigma[1, #]] &] (* Paolo Xausa, Mar 11 2024 *)
PROG
(PARI) for(n=1, oo, if((n%2)&&((2*n)==bitor(2*n, sigma(n))), print1(n, ", ")));
CROSSREFS
Odd terms of A324726.
Sequence in context: A175544 A373941 A139208 * A320026 A146435 A046932
KEYWORD
nonn,look
AUTHOR
Antti Karttunen, Mar 15 2019
STATUS
approved