|
|
A110486
|
|
Indices of Fibonacci numbers in A068136(n); that is, a(n) = least k such that the digits of Fibonacci(k) begin with the concatenation 1234..n.
|
|
1
|
|
|
|
OFFSET
|
1,2
|
|
COMMENTS
|
The sequence is strictly nondecreasing. Next term, if it exists, is greater than 1,800,000.
|
|
LINKS
|
|
|
EXAMPLE
|
fibonacci(227) = 123227981463641240980692501505442003148737643593 is the least Fibonacci number beginning with the concatenation 123, so a(3) = 227.
|
|
MATHEMATICA
|
k = 1; Do[l = IntegerDigits[Fibonacci[n]]; While[Take[l, Min[Length[l], k]] == Range[1, k], Print[n]; k++ ], {n, 1, 1800000}]
|
|
CROSSREFS
|
Cf. A068136 (corresponding Fibonacci numbers).
|
|
KEYWORD
|
base,hard,nonn
|
|
AUTHOR
|
|
|
STATUS
|
approved
|
|
|
|