A045705 Primes of the form F(i)^2 + F(j)^3, where F() are Fibonacci numbers.

2, 5, 17, 31, 449, 521, 953, 39313, 187111, 974177, 2989009, 45804529, 53603369, 226981169, 540660521, 961504807, 2149991549, 5631736609, 17253512729, 18074736353, 38580197099, 101003831729, 1311494070977, 101503242568393

Offset

1,1

Links

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

Formula

For example, a(2)=17 because 17=2^3+3^2

Mathematica

f = Table[ Fibonacci[ i ], {i, 1, 100} ]; g = Union[ Flatten[ Table[ f[ [ i ] ]^2 + f[ [ j ] ]^3, {i, 1, 100}, {j, 1, 100} ] ] ]; Table[ g[ [ Select[ Range[ 1000 ], PrimeQ[ g[ [ # ] ] ] & ] ] ] ]

Crossrefs

Cf. A000045.

Sequence in context: A269018 A066649 A075345 * A125822 A025537 A245784

Adjacent sequences: A045702 A045703 A045704 * A045706 A045707 A045708

Keyword

nonn

Author

Felice Russo

Extensions

More terms from Robert G. Wilson v, Aug 28 2001

Status

approved