|
| |
|
|
A084667
|
|
Primes which are a concatenation of n and prime[n].
|
|
0
| |
|
|
23, 47, 613, 1237, 1759, 1861, 2383, 27103, 30113, 35149, 36151, 41179, 42181, 45197, 46199, 54251, 56263, 57269, 58271, 61283, 71353, 82421, 83431, 85439, 92479, 93487, 99523, 115631, 117643, 119653, 121661, 123677, 127709, 136769
(list; graph; refs; listen; history; internal format)
|
|
|
|
OFFSET
| 1,1
|
|
|
EXAMPLE
| a(3)=613 because prime[6]=13 and concatenation of 6 and 13 is 613 which is prime
|
|
|
MATHEMATICA
| Select[Table[FromDigits[Flatten[{IntegerDigits[n], IntegerDigits[Prime[n]]}]], {n, 1, 500}], PrimeQ] (* from Alonso Delarte (alonso.delarte(AT)gmail.com), Sep 22 2004 *)
|
|
|
CROSSREFS
| Sequence in context: A054679 A054203 A042054 * A157358 A158238 A042056
Adjacent sequences: A084664 A084665 A084666 * A084668 A084669 A084670
|
|
|
KEYWORD
| nonn,base
|
|
|
AUTHOR
| Zak Seidov (zakseidov(AT)yahoo.com), Jun 29 2003
|
| |
|
|
