|
| |
|
|
A046255
|
|
a(1) = 5; a(n) is smallest number >= a(n-1) such that the juxtaposition a(1)a(2)...a(n) is a prime.
|
|
10
| |
|
|
5, 9, 9, 21, 53, 67, 71, 87, 87, 91, 117, 161, 187, 213, 363, 419, 501, 537, 543, 739, 879, 1101, 1329, 1391, 1641, 1939, 2093, 2109, 2331, 2557, 2639, 2697, 2863, 3441, 3441, 4413, 4461, 4479, 4557, 5489, 6033, 6267, 6351, 6973, 7181, 7459, 7679, 8113
(list; graph; refs; listen; history; internal format)
|
|
|
|
OFFSET
| 1,1
|
|
|
MATHEMATICA
| a[1] = 5; a[n_] := a[n] = Block[{k = a[n - 1], c = IntegerDigits @ Table[ a[i], {i, n - 1}]}, While[ !PrimeQ[ FromDigits @ Flatten @ Append[c, IntegerDigits[k]]], k += 2]; k]; Table[ a[n], {n, 49}] (from Robert G. Wilson v (rgwv(AT)rgwv.com), Aug 05 2005)
|
|
|
CROSSREFS
| Cf. A069607, A074341, A033680, A033679, A033681, A046254, A046256, A046257, A046258, A046259, A111524.
Sequence in context: A057655 A175374 A141124 * A068388 A205712 A093711
Adjacent sequences: A046252 A046253 A046254 * A046256 A046257 A046258
|
|
|
KEYWORD
| nonn
|
|
|
AUTHOR
| Patrick De Geest (pdg(AT)worldofnumbers.com), May 15, 1998.
|
| |
|
|
