[go: up one dir, main page]

login
A096213
Primes of the form 10^n + 10^(n-5) - 1.
0
1000009999, 10000099999, 1000009999999999, 100000999999999999999999, 100000999999999999999999999999, 1000009999999999999999999999999, 10000099999999999999999999999999999999999999999999999999999999999999999999
OFFSET
1,1
MATHEMATICA
Select[Table[10^n+10^(n-5)-1, {n, 80}], PrimeQ] (* Harvey P. Dale, May 22 2014 *)
PROG
(PARI) f(n, z) = for(x=z, n, y=10^x+10^(x-z)-1; if(ispseudoprime(y), print1(y", ")))
CROSSREFS
Sequence in context: A017649 A117979 A332308 * A048939 A269120 A095733
KEYWORD
nonn
AUTHOR
Cino Hilliard, Jul 28 2004
STATUS
approved