|
|
A253471
|
|
Numbers k such that 3^k + k^3 is prime.
|
|
2
|
|
|
|
OFFSET
|
1,1
|
|
COMMENTS
|
|
|
LINKS
|
|
|
EXAMPLE
|
2 is in the sequence because 3^2 + 2^3 = 17 is prime.
56 is in the sequence because 3^56 + 56^3 = 523347633027360537213687137 is prime.
|
|
MAPLE
|
select(t -> isprime(3^t+t^3), [seq(seq(6*i+j, j=[2, 4]), i=0..100)]); # Robert Israel, Jan 01 2015
|
|
MATHEMATICA
|
Do[If[PrimeQ[3^n+n^3], Print[n]], {n, 0, 12000}]
|
|
PROG
|
|
|
CROSSREFS
|
|
|
KEYWORD
|
nonn,hard,more
|
|
AUTHOR
|
|
|
EXTENSIONS
|
|
|
STATUS
|
approved
|
|
|
|