OFFSET
1,1
LINKS
Robert Israel, Table of n, a(n) for n = 1..10000
EXAMPLE
a(1) = 9: 9^2 - 2 = 79; 9^3 - 2 = 727; both results are prime.
a(2) = 15: 15^2 - 2 = 223; 15^3 - 2 = 3373; both results are prime.
MAPLE
filter:= k -> isprime(k^2-2) and isprime(k^3-2):
select(filter, [$2..10000]); # Robert Israel, Dec 24 2019
MATHEMATICA
Select[Range[10000], PrimeQ[#^3 - 2] && PrimeQ[#^2 - 2] &]
PROG
(Magma) [n : n in [1 .. 100] | IsPrime (n^2 - 2) and IsPrime (n^3 - 2)];
CROSSREFS
KEYWORD
nonn
AUTHOR
K. D. Bajpai, Dec 14 2019
STATUS
approved