A138181 Largest Fibonacci number not exceeding the n-th prime.

2, 3, 5, 5, 8, 13, 13, 13, 21, 21, 21, 34, 34, 34, 34, 34, 55, 55, 55, 55, 55, 55, 55, 89, 89, 89, 89, 89, 89, 89, 89, 89, 89, 89, 144, 144, 144, 144, 144, 144, 144, 144, 144, 144, 144, 144, 144, 144, 144, 144, 233, 233

Offset: 1

Author

Colm Mulcahy, Mar 04 2008

Keywords

• easy
• nonn

Comments

a(n) = largest summand in the Zeckendorf representation of the n-th prime

Examples

			a(4)=5 because 5 is the largest Fibonacci number not exceeding 7 (the 4th prime)
		

Crossrefs

Cf. A138182, A138183, A000040, A000045.

Programs

Mathematica

With[{rf=Reverse[Fibonacci[Range[20]]]},Flatten[Table[Select[rf,#<=Prime[ n]&,1],{n,60}]]] (* Harvey P. Dale, May 25 2013 *)

Extensions

Corrected by Harvey P. Dale, May 25 2013