OFFSET
0,1
LINKS
Chai Wah Wu, Table of n, a(n) for n = 0..10000
Popular Computing (Calabasas, CA), Two Tables, Vol. 1, (No. 9, Dec 1973), page PC9-16.
EXAMPLE
a(7) = 15 because 2^15 = 32768.
MATHEMATICA
a = {}; Do[k = 1; While[ StringPosition[ ToString[2^k], ToString[n] ] == {}, k++ ]; a = Append[a, k], {n, 0, 50} ]; a
PROG
(Python)
def A063565(n):
....s, k, k2 = str(n), 1, 2
....while True:
........if s in str(k2):
............return k
........k += 1
........k2 *= 2 # Chai Wah Wu, Jun 20 2015
CROSSREFS
KEYWORD
base,nonn
AUTHOR
Robert G. Wilson v, Aug 10 2001
EXTENSIONS
More terms from Hans Havermann
STATUS
approved