A243397 Numbers n such that 19^n+4 is prime.
0, 1, 3, 21, 145, 273, 1425, 9613, 15711, 18445
Offset: 1
Crossrefs
Programs
-
Magma
[n: n in [0..1000] | IsPrime(19^n+4)]; // Vincenzo Librandi, Oct 16 2014
-
Mathematica
Select[Range[0, 10000], PrimeQ[19^# + 4] &] (* Vincenzo Librandi, Oct 16 2014 *)
-
PARI
for(n=0, 10^5, if(ispseudoprime(19^n+4), print1(n, ", ")))
Extensions
a(1)-a(2) prepended by N. J. A. Sloane, Jun 18 2014
a(9)-a(10) from Felix Fröhlich, Oct 16 2014
Comments