A096211 Primes of the form 10^n + 10^(n-3) - 1.

10009, 1000999, 10009999999999, 10009999999999999999999999999999999999, 10009999999999999999999999999999999999999999999999999999999999999, 10009999999999999999999999999999999999999999999999999999999999999999999999999

Offset

1,1

Links

Vincenzo Librandi, Table of n, a(n) for n = 1..10

Mathematica

t={}; Do[m=n; p=10^n+10^(n-3)-1; If[PrimeQ[p], AppendTo[t, p]], {n, 300}]; t (* Vincenzo Librandi, Jul 17 2012 *)

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: A256838 A176931 A023335 * A190149 A052095 A033533

Adjacent sequences: A096208 A096209 A096210 * A096212 A096213 A096214

Keyword

nonn,easy

Author

Cino Hilliard, Jul 28 2004

Status

approved