A059326 Numbers k such that 2*3^k + 7 is prime.
1, 3, 9, 11, 15, 17, 24, 41, 68, 72, 641, 716, 1139, 1200, 1661, 3339, 5181, 68769
Offset: 1
Crossrefs
Cf. A059454 (2*3^k - 7 is prime).
Programs
-
Magma
[n: n in [0..1000] | IsPrime(2*3^n+7)]; // Jinyuan Wang, Jan 20 2020
-
Mathematica
Do[ If[ PrimeQ[ 2*3^n + 7 ], Print[n] ], {n, 0, 10000} ]
-
PARI
is(n)=ispseudoprime(2*3^n+7) \\ Charles R Greathouse IV, Jun 13 2017
Extensions
a(18) from Michael S. Branicky, Jul 07 2024
Comments