|
Search: id:A045705
|
|
|
| A045705 |
|
Primes of the form F(i)^2 + F(j)^3, where F() are Fibonacci numbers. |
|
+0
1
|
|
| 2, 5, 17, 31, 449, 521, 953, 39313, 187111, 974177, 2989009, 45804529, 53603369, 226981169, 540660521, 961504807, 2149991549, 5631736609, 17253512729, 18074736353, 38580197099, 101003831729, 1311494070977, 101503242568393
(list; graph; listen)
|
|
|
OFFSET
|
1,1
|
|
|
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: A101009 A066649 A075345 this_sequence A125822 A025537 A028916
Adjacent sequences: A045702 A045703 A045704 this_sequence A045706 A045707 A045708
|
|
KEYWORD
|
nonn
|
|
AUTHOR
|
Felice Russo (felice.russo(AT)katamail.com)
|
|
EXTENSIONS
|
More terms from Robert G. Wilson v (rgwv(AT)rgwv.com), Aug 28 2001
|
|
|
Search completed in 0.002 seconds
|
