|
Search: id:A133320
|
|
|
| A133320 |
|
Numbers n such that both A124296(n) = 5*F(n)^2 - 5*F(n) + 1 and A124297(n) = 5*F(n)^2 + 5*F(n) + 1 are prime, where F(n) = Fibonacci[n]. |
|
+0 1
|
| |
|
|
OFFSET
|
1,1
|
|
|
MATHEMATICA
|
Do[ F=Fibonacci[n]; f=5*F^2-5*F+1; g=5*F^2+5*F+1; If[ PrimeQ[f], If[ PrimeQ[g], Print[ {n, f, g} ] ] ], {n, 1, 1000} ]
|
|
CROSSREFS
|
Cf. A124297 = 5*F(n)^2 + 5*F(n) + 1, where F(n) = Fibonacci[n]. Cf. A124296 = 5*F(n)^2 - 5*F(n) + 1, where F(n) = Fibonacci[n]. Cf. A000032, A000045, A121171, A001946.
Sequence in context: A122413 A136366 A123820 this_sequence A128920 A006288 A047598
Adjacent sequences: A133317 A133318 A133319 this_sequence A133321 A133322 A133323
|
|
KEYWORD
|
more,nonn
|
|
AUTHOR
|
Alexander Adamchuk (alex(AT)kolmogorov.com), Oct 18 2007
|
|
|
Search completed in 0.002 seconds
|