A030473 Primes which are concatenations of 4 consecutive primes.

2357, 67717379, 838997101, 139149151157, 149151157163, 383389397401, 503509521523, 557563569571, 577587593599, 587593599601, 601607613617, 613617619631, 727733739743, 937941947953, 1181118711931201

Offset: 1

Author

Patrick De Geest

Keywords

• nonn
• base

Links

• Zak Seidov and Robert Israel, Table of n, a(n) for n = 1..10000 (n = 1..1205 from Zak Seidov)

Crossrefs

Cf. A030461, A030469, A086040, A086041.

Programs

Maple

P:= select(isprime,[2,seq(p,p=3..10^4,2)]):
select(isprime,[seq(P[i+3]+10^(1+ilog10(P[i+3]))*P[i+2] + 10^(2+ilog10(P[i+3])+ilog10(P[i+2]))*P[i+1] + 10^(3+ilog10(P[i+3])+ilog10(P[i+2])+ilog10(P[i+1]))*P[i], i=1..nops(P)-3)]); # Robert Israel, Apr 14 2016

Extensions

Edited by Charles R Greathouse IV, Apr 23 2010