A177048 Least k such that k^n starts with n in base 2.

1, 2, 3, 2, 13, 11, 13, 2, 3, 25, 5, 7, 15, 35, 35, 2, 57, 31, 13, 77, 37, 23, 7, 29, 15, 25, 3, 51, 27, 61, 5, 2, 43, 37, 57, 25, 17, 31, 13, 69, 75, 13, 49, 9, 13, 75, 99, 45, 103, 57, 37, 35, 23, 25, 23, 75, 23, 295, 23, 163, 21, 5, 23, 2, 3, 79, 23, 123, 23, 345, 33, 5, 15

Offset

1,2

Links

Seiichi Manyama, Table of n, a(n) for n = 1..5000

Prog

(Haskell)
toBinary 0 = []
toBinary n = toBinary (n `div` 2) ++ [odd n]
a = [1 + fromJust (findIndex (isPrefixOf (toBinary n)) [toBinary (k ^ n) | k <- [1..]]) | n <- [1..]]

Crossrefs

Cf. A177047.

Sequence in context: A023641 A083775 A083784 * A160819 A299700 A205441

Adjacent sequences: A177045 A177046 A177047 * A177049 A177050 A177051

Keyword

nonn,base,easy

Author

Vladimir Reshetnikov, May 01 2010

Extensions

More terms from Seiichi Manyama, Dec 22 2019

Status

approved