cp's OEIS Frontend

This is a front-end for the Online Encyclopedia of Integer Sequences, made by Christian Perfect. The idea is to provide OEIS entries in non-ancient HTML, and then to think about how they're presented visually. The source code is on GitHub.

A023184 Least Fibonacci number ending with n.

This page as a plain text file.
%I A023184 #12 Mar 13 2015 00:58:28
%S A023184 0,1,2,3,34,5,10946,377,8,89,610,17711,
%T A023184 619220451666590135228675387863297874269396512,13,
%U A023184 70492524767089125814114,659034621587630041982498215,57602132235424755886206198685365216,24157817,196418,114059301025943970552219,1548008755920
%N A023184 Least Fibonacci number ending with n.
%C A023184 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.
%e A023184 a(11) = 17711 is the smallest Fibonacci number ending in 11.
%p A023184 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);
%t A023184 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 *)
%Y A023184 Cf. A000045, A023185, A020344, A020345.
%K A023184 nonn,base
%O A023184 0,3
%A A023184 _David W. Wilson_