A139052 Array read by rows: row n lists the first two primes with n digits.

2, 3, 11, 13, 101, 103, 1009, 1013, 10007, 10009, 100003, 100019, 1000003, 1000033, 10000019, 10000079, 100000007, 100000037, 1000000007, 1000000009, 10000000019, 10000000033, 100000000003, 100000000019, 1000000000039, 1000000000061

Offset

1,1

Links

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

Mathematica

ftp[d_]:=Module[{np1=NextPrime[10^(d-1)]}, {np1, NextPrime[np1]}]; Array[ ftp, 15]//Flatten (* Harvey P. Dale, Mar 27 2021 *)

Crossrefs

Cf. A000040, A003617, A073914, A139053, A139054.

Sequence in context: A215374 A355542 A057324 * A076491 A105226 A139021

Adjacent sequences: A139049 A139050 A139051 * A139053 A139054 A139055

Keyword

base,nonn,tabf

Author

Omar E. Pol, Apr 08 2008

Extensions

More terms from Sean A. Irvine, Jun 02 2011

Status

approved