|
Search: id:A114009
|
|
|
| A114009 |
|
n primes beginning with prime(n). |
|
+0
1
|
|
| 2, 3, 31, 5, 53, 59, 7, 71, 73, 79, 11, 113, 1103, 1109, 1117, 13, 131, 137, 139, 1301, 1303, 17, 173, 179, 1709, 1721, 1723, 1733, 19, 191, 193, 197, 199, 1901, 1907, 1913, 23, 233, 239, 2309, 2311, 2333, 2339, 2341, 2347, 29, 293, 2903, 2909, 2917, 2927
(list; graph; listen)
|
|
|
OFFSET
|
1,1
|
|
|
EXAMPLE
|
One prime beginning with 2, followed by the two primes 3, 31 beginning with 3.
|
|
MATHEMATICA
|
f[n_] := Block[{c = 0, t = {}, p = Prime[n]}, k = PrimePi[p]; lng = Ceiling[Log[10, p]]; While[c < n, q = Prime[k]; If[p == FromDigits@Take[IntegerDigits@q, lng], c++; AppendTo[t, q]]; k++ ]; t]; Array[f, 10] // Flatten (* Robert G. Wilson v *)
|
|
CROSSREFS
|
Sequence in context: A048986 A093712 A035514 this_sequence A143665 A074479 A136150
Adjacent sequences: A114006 A114007 A114008 this_sequence A114010 A114011 A114012
|
|
KEYWORD
|
base,nonn
|
|
AUTHOR
|
Amarnath Murthy (amarnath_murthy(AT)yahoo.com), Nov 12 2005
|
|
EXTENSIONS
|
More terms from Robert G. Wilson v (rgwv(at)rgwv.com), Nov 17 2005
|
|
|
Search completed in 0.002 seconds
|
