OFFSET
1,1
LINKS
Carmine Suriano, Table of n, a(n) for n = 1..325
EXAMPLE
41 = fib(7) + fib(1)^2 + fib(4)^3.
MATHEMATICA
f = Union[Table[Fibonacci[n], {n, 15}]]; t = Union[Flatten[Table[ f[[i]] + f[[j]]^2 + f[[k]]^3, {i, Length[f]}, {j, Length[f]}, {k, Length[f]}]]]; Select[t, # <= f[[-1]] && PrimeQ[#] &] (* T. D. Noe, Jun 03 2011 *)
CROSSREFS
KEYWORD
nonn
AUTHOR
Carmine Suriano, Jun 01 2011
STATUS
approved