%I #34 Feb 24 2023 20:04:27
%S 2,3,5,7,11,13,17,19,101,103,107,109,1009,1013,1019,1021,10007,10009,
%T 10037,10039,100003,100019,100043,100049,1000003,1000033,1000037,
%U 1000039,10000019,10000079,10000103,10000121,100000007,100000037,100000039,100000049
%N Array read by rows: row n lists the first 4 primes with n digits.
%C First differs from A000040 at a(9). - _Omar E. Pol_, Feb 13 2014
%F a(4n-3) = A003617(n). - _Omar E. Pol_, Feb 13 2014
%e Array begins:
%e 2, 3, 5, 7;
%e 11, 13, 17, 19;
%e 101, 103, 107, 109;
%e ...
%t Flatten @ Table[ NextPrime[10^i, Range @ 4], {i, 0, 9}] (* _Mikk Heidemaa_, Jan 08 2023 *)
%Y Cf. A000040, A003617, A073914, A139052, A139053.
%K base,nonn,tabf
%O 1,1
%A _Omar E. Pol_, Apr 08 2008
%E More terms from _Michel Marcus_, Feb 13 2014
|