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,1

Comments

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

Links

Table of n, a(n) for n=1..52.

Example

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

Mathematica

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

Crossrefs

Cf. A138182, A138183, A000040, A000045.

Sequence in context: A204207 A354704 A287919 * A006447 A014237 A033885

Adjacent sequences: A138178 A138179 A138180 * A138182 A138183 A138184

Keyword

easy,nonn

Author

Colm Mulcahy, Mar 04 2008

Extensions

Corrected by Harvey P. Dale, May 25 2013

Status

approved