|
| |
|
|
A114924
|
|
Primes p such that pi(p) is obtained by dropping one of the digits of p in decimal expansion.
|
|
2
| |
|
|
17, 12491, 14723, 42437, 57089, 58193, 61051, 63131, 63347, 64553, 64567, 64577, 64591, 64601, 64661, 64679, 64951, 65071, 65173, 65293, 65881, 66863, 69931, 79817, 99551, 129083, 165103, 263071, 284833, 1407647, 1515259, 4303027
(list; graph; refs; listen; history; internal format)
|
|
|
|
OFFSET
| 1,1
|
|
|
COMMENTS
| If n>31 then we can get pi(a(n)) by dropping the first digit of a(n). Next term is greater than prime(20000000).
|
|
|
EXAMPLE
| 95517973 is in the sequence because 95517973 is prime and pi(95517973)=5517973.
|
|
|
MATHEMATICA
| Do[h=IntegerDigits[Prime@n]; l=Length[h]; If[MemberQ[Table[ FromDigits[Drop[h, {k}]], {k, l}], n], Print[Prime@n]], {n, 20000000}]
|
|
|
CROSSREFS
| Cf. A114924.
Sequence in context: A192766 A166326 A203678 * A191964 A134360 A171687
Adjacent sequences: A114921 A114922 A114923 * A114925 A114926 A114927
|
|
|
KEYWORD
| fini,base,nonn
|
|
|
AUTHOR
| Farideh Firoozbakht (mymontain(AT)yahoo.com), Jan 14 2006
|
| |
|
|