login

Reminder: The OEIS is hiring a new managing editor, and the application deadline is January 26.

a(n) is the beginning of the first set of n consecutive primes such that the concatenation of n with each of these primes is also prime.
0

%I #13 Nov 18 2018 00:29:58

%S 3,23,7,720901,956759,41,4769888443

%N a(n) is the beginning of the first set of n consecutive primes such that the concatenation of n with each of these primes is also prime.

%C a(8) > 10^11, a(9) = 11408039. - _Hans Havermann_, Sep 16 2005

%e a(3) = 7 because 7, 11 and 13 are 3 consecutive primes and 37, 311 and 313 are all prime.

%t <<NumberTheory`; Do[s = 0; l = {}; While[Length[l] < n, s++; l = List[Prime[s]]; k = 1; While[k < n, p = l[[k]]; AppendTo[l, NextPrime[p]]; k++ ]; l = ToString /@ l; l = Map[ToString[n] <> #&, l]; l = ToExpression /@ l; l = Select[l, PrimeQ]]; Print[Prime[s]], {n, 1, 30}]; (* _Ryan Propper_, Aug 14 2005 *)

%K base,hard,nonn

%O 1,1

%A _Amarnath Murthy_, Oct 15 2003

%E Corrected, extended and edited by _Ryan Propper_ and _David Wasserman_, Aug 14 2005

%E a(7) from _Hans Havermann_, Sep 16 2005