This is a front-end for the Online Encyclopedia of Integer Sequences, made by Christian Perfect. The idea is to provide OEIS entries in non-ancient HTML, and then to think about how they're presented visually. The source code is on GitHub.
%I A237659 #25 May 10 2025 13:54:56
%S A237659 17,41,59,109,127,157,353,367,709,1153,1787,3319,3407,3911,5851,6037,
%T A237659 6217,6469,8389,9103,9319,10663,13709,14107,14591,15683,18433,19463,
%U A237659 19577,20107,21727,23209,27809,29383,32797,35023,36251,36599,38351,39239
%N A237659 Primes p with pi(p) and pi(p^2) both prime, where pi(.) is given by A000720.
%C A237659 This is a subsequence of A237658.
%C A237659 Conjecture: The sequence has infinitely many terms.
%H A237659 Chai Wah Wu, <a href="/A237659/b237659.txt">Table of n, a(n) for n = 1..10000</a> (n = 1..600 from Zhi-Wei Sun)
%e A237659 a(1) = 17 with pi(17) = 7 and pi(17^2) = 61 both prime.
%e A237659 a(2) = 41 with pi(41) = 13 and pi(41^2) = 263 both prime.
%t A237659 p[m_]:=PrimeQ[PrimePi[m^2]]
%t A237659 n=0;Do[If[p[Prime[Prime[k]]],n=n+1;Print[n," ",Prime[Prime[k]]]],{k,1,1000}]
%t A237659 Select[Prime[Range[4500]],AllTrue[{PrimePi[#],PrimePi[#^2]},PrimeQ]&] (* _Harvey P. Dale_, May 10 2025 *)
%Y A237659 Cf. A000040, A000290, A000720, A006450, A038107, A237656, A237657, A237658.
%K A237659 nonn
%O A237659 1,1
%A A237659 _Zhi-Wei Sun_, Feb 11 2014