|
| |
|
|
A074365
|
|
Smallest prime > the concatenation of the first n natural numbers.
|
|
0
| |
|
|
2, 13, 127, 1237, 12347, 123457, 1234577, 12345701, 123456791, 12345678923, 1234567891013, 123456789101119, 12345678910111223, 1234567891011121343, 123456789101112131449, 12345678910111213141523, 1234567891011121314151753
(list; graph; refs; listen; history; internal format)
|
|
|
|
OFFSET
| 1,1
|
|
|
EXAMPLE
| The first prime > 123, the concatenation of the first three natural numbers, is 127. Hence a(3) = 127.
|
|
|
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
|
|
|
CROSSREFS
| Sequence in context: A086630 A151361 A073559 * A071362 A108471 A036078
Adjacent sequences: A074362 A074363 A074364 * A074366 A074367 A074368
|
|
|
KEYWORD
| base,nonn
|
|
|
AUTHOR
| Joseph L. Pe (joseph_l_pe(AT)hotmail.com), Sep 26 2002
|
|
|
EXTENSIONS
| More terms from Lior Manor (lior.manor(AT)gmail.com) Oct 08 2002
|
| |
|
|
