A273940 Primes of the form 5^m - m.
23, 15619, 244140613
Offset: 1
Links
- Amiram Eldar, Table of n, a(n) for n = 1..5
Crossrefs
Programs
-
Magma
[a: n in [0..400] | IsPrime(a) where a is 5^n-n];
-
Mathematica
Select[Table[5^n - n, {n, 400}], PrimeQ] -
PARI
forstep(n=2,1e4,2, if(ispseudoprime(t=5^n-n), print1(t", "))) \\ Charles R Greathouse IV, Jun 08 2016
Comments