|
| |
|
|
A053582
|
|
a(n+1) is the smallest prime ending with a(n), where a(1)=1.
|
|
11
| |
|
|
1, 11, 211, 4211, 34211, 234211, 4234211, 154234211, 3154234211, 93154234211, 2093154234211, 42093154234211, 342093154234211, 11342093154234211, 3111342093154234211, 63111342093154234211, 2463111342093154234211
(list; graph; refs; listen; history; internal format)
|
|
|
|
OFFSET
| 1,2
|
|
|
MATHEMATICA
| f[n_] := f[n] = Block[{j = f[n - 1], k = 1, l = Floor[Log[10, f[n - 1]] + 1]}, While[m = k*10^l + j; ! PrimeQ@ m, k++ ]; m]; f[1] = 1; Array[f, 17]
|
|
|
CROSSREFS
| Cf. A000040.
Sequence in context: A136307 A038399 A053547 * A077714 A089567 A110747
Adjacent sequences: A053579 A053580 A053581 * A053583 A053584 A053585
|
|
|
KEYWORD
| base,nonn
|
|
|
AUTHOR
| G. L. Honaker, Jr. (honak3r(AT)gmail.com), Jan 18 2000
|
|
|
EXTENSIONS
| a(14)-a(17) corrected by Robert G. Wilson
|
| |
|
|
