OFFSET
0,1
COMMENTS
The multi-digit generalization of A171132. - R. J. Mathar, Jul 06 2015
LINKS
Chai Wah Wu, Table of n, a(n) for n = 0..1000
Popular Computing (Calabasas, CA), Two Tables, Vol. 1, (No. 9, Dec 1973), page PC9-16.
EXAMPLE
2^53 = 9007199254740992 contains two adjacent 0's.
MATHEMATICA
Table[k = 0; While[! SequenceCount[IntegerDigits[2^k], Flatten[ConstantArray[IntegerDigits[n], 2]]] > 0, k++]; k, {n, 0, 100}] (* Robert Price, May 17 2019 *)
PROG
(Python)
def A259091(n):
s, k, k2 = str(n)*2, 0, 1
while True:
if s in str(k2):
return k
k += 1
k2 *= 2 # Chai Wah Wu, Jun 18 2015
CROSSREFS
KEYWORD
nonn,base
AUTHOR
N. J. A. Sloane, Jun 18 2015
EXTENSIONS
More terms from Chai Wah Wu, Jun 18 2015
STATUS
approved