login
A266343
Positions of records in A266342.
2
1, 120, 1980, 7920, 30240, 109200, 120120, 480480, 491400, 1853280, 1884960, 1965600, 2106720, 7207200, 8168160, 8482320, 8648640, 31600800, 121080960, 122522400, 129729600, 136936800, 465585120, 490089600, 497296800, 514594080, 537213600, 551350800
OFFSET
1,2
COMMENTS
The corresponding record values A266342(a(n)) are 1, 2, 3, 4, 5, 6, 8, 9, 10, 11, 12, 13, 15, 16, 17, 18, 21, 25, 26, ...
LINKS
Hiroaki Yamanouchi, Table of n, a(n) for n = 1..56
PROG
(PARI)
A000523(n) = if(n<1, 0, #binary(n) - 1);
A266342(n) = sumdiv(n, d, ((d <= (n/d)) && (A000523(d)==A000523(n/d))));
m=0; i=0; for(n=1, 2^32, k = A266342(n); if(k > m, m = k; i++; write("b266343.txt", i, " ", n)));
CROSSREFS
Cf. A266342.
Sequence in context: A219720 A346574 A244838 * A293972 A144858 A084030
KEYWORD
nonn,base
AUTHOR
Antti Karttunen, Dec 28 2015
EXTENSIONS
a(20)-a(28) from Hiroaki Yamanouchi, Jan 02 2016
STATUS
approved