A191378 Primes that are the sum of a positive Fibonacci, a positive Fibonacci number squared, and a positive Fibonacci number cubed.

3, 5, 7, 11, 13, 17, 19, 23, 29, 31, 37, 41, 43, 47, 53, 67, 73, 83, 101, 107, 127, 131, 137, 139, 149, 151, 163, 173, 179, 181, 191, 197, 199, 211, 223, 239, 251, 269, 307, 349, 359, 367, 379, 383, 389, 443, 449, 457, 463, 503, 521, 523, 547, 557, 569, 571

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

Cf. A000045.

Sequence in context: A245072 A338134 A138980 * A191376 A179429 A020615

Adjacent sequences: A191375 A191376 A191377 * A191379 A191380 A191381

Keyword

nonn

Author

Carmine Suriano, Jun 01 2011

Status

approved