A105104 Write A102370 in binary (A103542), read backwards, omit leading zeros, convert to base 10.
0, 3, 3, 5, 1, 15, 5, 9, 1, 13, 7, 11, 7, 29, 9, 17, 1, 25, 13, 21, 5, 31, 11, 19, 3, 27, 15, 47, 13, 57, 17, 33, 1, 49, 25, 41, 9, 61, 21, 37, 5, 53, 29, 45, 15, 59, 19, 35, 3, 51, 27, 43, 11, 63, 23, 39, 7, 55, 63, 93, 25, 113, 33, 65, 1, 97, 49, 81, 17, 121, 41, 73
Offset: 0
Links
Programs
-
PARI
a1(n) = fromdigits(Vecrev(binary(n)), 2); \\ A030101 a0(n) = if( n<1, 0, sum(k=0, length(binary(n)), bitand(n + k, 2^k))); \\ A102370 a(n) = a1(a0(n)); \\ Michel Marcus, Apr 09 2022
Formula
Extensions
More terms from Philippe Deléham, Nov 11 2007
a(46)=19 inserted and more terms from Georg Fischer, Apr 08 2022
Comments