login
The OEIS is supported by the many generous donors to the OEIS Foundation.

 

Logo
Hints
(Greetings from The On-Line Encyclopedia of Integer Sequences!)
A074366 The first prime greater than the concatenation of the first n primes. 2
3, 29, 239, 2371, 235723, 23571127, 2357111357, 235711131727, 23571113171939, 2357111317192343, 235711131719232977, 23571113171923293283, 2357111317192329313801, 235711131719232931374149, 23571113171923293137414371, 2357111317192329313741434781 (list; graph; refs; listen; history; text; internal format)
OFFSET
1,1
LINKS
EXAMPLE
The first prime > 235, the concatenation of the first three primes, is 239. Hence a(3) = 239.
MATHEMATICA
p[n_] := Module[{r, i}, r = 2; i = 1; While[r <= n, i = i + 1; r = Prime[i]]; r]; s = ""; a = {}; Do[s = s <> ToString[Prime[i]]; a = Append[a, p[ToExpression[s]]], {i, 1, 8}]; a
<<NumberTheory`NumberTheoryFunctions` sz[x_] :=FromDigits[Flatten[Table[IntegerDigits[Prime[j]], {j, 1, x}], 1]] Table[NextPrime[sz[w]], {w, 1, 35}] (* Labos Elemer, Mar 18 2005 *)
Module[{nn=20, p}, p=Prime[Range[nn]]; Table[NextPrime[FromDigits[Flatten[ IntegerDigits/@Take[p, n]]]], {n, nn}]] (* Harvey P. Dale, Oct 03 2013 *)
PROG
(Python)
from sympy import nextprime, prime, primerange
def a(n):
return nextprime(int("".join(map(str, primerange(2, prime(n)+1)))))
print([a(n) for n in range(1, 17)]) # Michael S. Branicky, Mar 29 2021
CROSSREFS
Cf. A019158.
Sequence in context: A201490 A354402 A135163 * A037791 A037672 A037798
KEYWORD
nonn,base
AUTHOR
Joseph L. Pe, Sep 26 2002
EXTENSIONS
More terms from Labos Elemer, Mar 18 2005
Edited by N. J. A. Sloane, May 21 2008 at the suggestion of R. J. Mathar
Edited by Charles R Greathouse IV, Apr 28 2010
STATUS
approved

Lookup | Welcome | Wiki | Register | Music | Plot 2 | Demos | Index | Browse | More | WebCam
Contribute new seq. or comment | Format | Style Sheet | Transforms | Superseeker | Recents
The OEIS Community | Maintained by The OEIS Foundation Inc.

License Agreements, Terms of Use, Privacy Policy. .

Last modified July 13 20:42 EDT 2024. Contains 374288 sequences. (Running on oeis4.)