A127004 Primes p+10^n arising in A127003.

3, 13, 103, 1013, 10007, 100003, 1000003, 10000019, 100000007, 1000000007, 10000000019, 100000000003, 1000000000061, 10000000000037, 100000000000031, 1000000000000037, 10000000000000061, 100000000000000003, 1000000000000000003, 10000000000000000097

Offset

1,1

Comments

Equivalently, smallest prime q such that q-10^n is also prime.

Links

Table of n, a(n) for n=1..20.

Mathematica

s={}; Do[p=0; Until[PrimeQ[q=Prime[p]+10^n], p++]; AppendTo[s, q], {n, 0, 20}]; s (* James C. McMahon, Dec 30 2024 *)

Crossrefs

Cf. A127003, A056208.

Sequence in context: A168417 A352170 A240167 * A068168 A215126 A228148

Adjacent sequences: A127001 A127002 A127003 * A127005 A127006 A127007

Keyword

nonn

Author

Rick L. Shepherd, Jan 01 2007

Extensions

a(18)-a(19) from James C. McMahon, Dec 30 2024

Status

approved