[go: up one dir, main page]

login
A114452
Numbers k such that k^9 - 7 is prime.
1
6, 18, 20, 26, 38, 48, 50, 90, 108, 114, 120, 150, 174, 246, 314, 348, 354, 416, 440, 450, 528, 660, 744, 764, 768, 900, 944, 974, 1026, 1040, 1068, 1080, 1094, 1226, 1254, 1320, 1434, 1458, 1496, 1544, 1590, 1626, 1836, 1838, 1844, 1884
OFFSET
1,1
LINKS
EXAMPLE
If k=114 then k^9 - 7 = 3251948521156637177 (prime).
MATHEMATICA
For[n = 2, n < 2000, n += 2, If[PrimeQ[n^9 - 7], Print[n]]] (* Stefan Steinerberger, Feb 17 2006 *)
Select[Range[2000], PrimeQ[#^9-7]&] (* Harvey P. Dale, Dec 10 2013 *)
PROG
(Magma) [n: n in [1..2500] | IsPrime(n^9 - 7)]; // Vincenzo Librandi, Jan 31 2011
(PARI) is(n)=isprime(n^9-7) \\ Charles R Greathouse IV, Jun 13 2017
CROSSREFS
Sequence in context: A234752 A370865 A370863 * A253914 A283744 A108762
KEYWORD
nonn,easy
AUTHOR
Parthasarathy Nambi, Feb 14 2006
EXTENSIONS
More terms from Stefan Steinerberger, Feb 17 2006
STATUS
approved