login
A386905
Distinct terms in A385988.
2
1, 2, 3, 7, 23, 11415, 56553873808298479843537432588765043239809588104012779518849306976361095532563320075112688420502361617080665176812695
OFFSET
1,2
LINKS
MATHEMATICA
s = 0; k = 1; Reap[Do[s += k; If[IntegerQ@ Log2[s], k = n; Sow[k]], {n, 2^16}] ][[-1, 1]] (* Michael De Vlieger, Aug 07 2025 *)
PROG
(PARI) \\ See Corneth link
CROSSREFS
Cf. A385988.
Sequence in context: A102710 A048824 A355015 * A374166 A099073 A129724
KEYWORD
nonn
AUTHOR
Paolo Xausa and David A. Corneth, Aug 07 2025
STATUS
approved