A266343 Positions of records in A266342.

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

Adjacent sequences: A266340 A266341 A266342 * A266344 A266345 A266346

Keyword

nonn,base

Author

Antti Karttunen, Dec 28 2015

Extensions

a(20)-a(28) from Hiroaki Yamanouchi, Jan 02 2016

Status

approved