A099727 Concatenations of six consecutive primes forming a prime.

113127131137139149, 569571577587593599, 727733739743751757, 733739743751757761, 739743751757761769, 102110311033103910491051, 105110611063106910871091, 110911171123112911511153, 118111871193120112131217, 138113991409142314271429

Offset

1,1

Links

K. D. Bajpai, Table of n, a(n) for n = 1..1470

Example

The prime 113127131137139149 is a concatenation of the consecutive primes 113, 127, 131, 137, 139 and 149.

Maple

with(numtheory): with(StringTools):
KD := proc() local a ;
    a:= parse(cat(ithprime(n), ithprime(n+1), ithprime(n+2), ithprime(n+3), ithprime(n+4), ithprime(n+5)));
    if isprime(a) then RETURN (a);
    fi;
end: seq(KD(), n=1..500); # K. D. Bajpai, Mar 24 2014

Mathematica

Select[FromDigits[Flatten[IntegerDigits/@#]]&/@Partition[Prime[Range[ 300]], 6, 1], PrimeQ] (* Harvey P. Dale, Apr 30 2020 *)

Crossrefs

Cf. A030461, A030469, A030473, A086040, A086041.

Sequence in context: A067818 A262560 A095433 * A011530 A198801 A317259

Adjacent sequences: A099724 A099725 A099726 * A099728 A099729 A099730

Keyword

nonn,base

Author

Ray G. Opao, Nov 07 2004

Status

approved