A023184 Least Fibonacci number ending with n.

0, 1, 2, 3, 34, 5, 10946, 377, 8, 89, 610, 17711, 619220451666590135228675387863297874269396512, 13, 70492524767089125814114, 659034621587630041982498215, 57602132235424755886206198685365216, 24157817, 196418, 114059301025943970552219, 1548008755920

Offset

0,3

Comments

The Fibonacci index of the 12th to 25th terms respectively are 216, 7, 111, 130, 168, 37, 27, 112, 90, 8, 183, 286, 252 and 25.

Links

Table of n, a(n) for n=0..20.

Example

a(11) = 17711 is the smallest Fibonacci number ending in 11.

Maple

with(combinat):for n from 1 to 40 do e := 1; g := ceil(log(n+1)/log(10)-0.00001): while((fibonacci(e) mod 10^g)<n or (fibonacci(e) mod 10^g)>n) do e := e+1:end do: q[n] := fibonacci(e):end do:seq(q[i], i=1..40);

Mathematica

d[n_]:=IntegerDigits[n]; Table[j=0; While[Length[d[Fibonacci[j]]]<(le=Length[y=d[n]]), j++]; i=j; While[Take[d[x=Fibonacci[i]], -le]!=y, i++]; x, {n, 0, 20}] (* Jayanta Basu, May 18 2013 *)

Crossrefs

Cf. A000045, A023185, A020344, A020345.

Sequence in context: A046487 A062922 A080471 * A114229 A032816 A073657

Adjacent sequences: A023181 A023182 A023183 * A023185 A023186 A023187

Keyword

nonn,base

Author

David W. Wilson

Status

approved