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

2, 5, 13, 29, 73, 89, 173, 233, 1181, 1597, 3089, 23761, 28657, 54293, 142193, 372269, 426389, 514229, 2922509, 6680081, 119822837, 320356577, 433494437, 2971215073, 5748565541, 38580030893, 38580085013, 38582581133, 44208781349

Offset

1,1

Links

T. D. Noe, Table of n, a(n) for n=1..300

Formula

5 = 1^2 + 2^2.

Mathematica

f=Table[Fibonacci[i], {i, 1, 100}]; g=Union[Flatten[Table[f[[i]]^2+f[[j]]^2, {i, 1, 80}, {j, 1, 80}]]]; Table[g[[Select[Range[400], PrimeQ[g[[#]]]&]]]] (* Vincenzo Librandi, Jul 13 2012 *)

Crossrefs

Cf. A000045.

Sequence in context: A214633 A282831 A259762 * A289843 A242080 A178444

Adjacent sequences: A045700 A045701 A045702 * A045704 A045705 A045706

Keyword

nonn

Author

Felice Russo

Status

approved