|
|
A237687
|
|
Primes p with pi(p), pi(pi(p)) and pi(p^2) all prime, where pi(.) is given by A000720.
|
|
2
|
|
|
59, 127, 709, 1153, 1787, 9319, 13709, 19577, 32797, 35023, 39239, 40819, 53353, 62921, 75269, 90023, 161159, 191551, 218233, 228451, 235891, 238339, 239087, 272999, 289213, 291619, 339601, 439357, 500741, 513683
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
1,1
|
|
COMMENTS
|
Conjecture: The sequence has infinitely many terms.
|
|
LINKS
|
|
|
EXAMPLE
|
a(1) = 59 with 59, pi(59) = 17, pi(pi(59)) = pi(17) = 7 and pi(59^2) = 487 all prime.
|
|
MATHEMATICA
|
p[m_]:=PrimeQ[PrimePi[m^2]]
n=0; Do[If[p[Prime[Prime[Prime[k]]]], n=n+1; Print[n, " ", Prime[Prime[Prime[k]]]]], {k, 1, 1000}]
|
|
CROSSREFS
|
|
|
KEYWORD
|
nonn
|
|
AUTHOR
|
|
|
STATUS
|
approved
|
|
|
|