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 A065046 #17 Aug 05 2025 10:02:27 %S A065046 1,2,3,4,7,9,14,15,16,19,22,30,38,44,55,64,79,81,90,91,93,94,96,101, %T A065046 113,115,117,118,121,122,123,124,125,133,142,148,163,173,176,178,182, %U A065046 183,185,189,190,199,205,206,208,223,226,232,239,240,251,253,255,263 %N A065046 Numbers k such that prime(k) - pi(k) is a prime. %H A065046 Harry J. Smith, <a href="/A065046/b065046.txt">Table of n, a(n) for n = 1..1000</a> %t A065046 Select[Range[300], PrimeQ[Prime[ # ] - PrimePi[ # ]] & ] %o A065046 (PARI) isok(m) = isprime(prime(m) - primepi(m)); \\ _Harry J. Smith_, Oct 04 2009 %Y A065046 Cf. A065042, A111181. %K A065046 easy,nonn %O A065046 1,2 %A A065046 _Robert G. Wilson v_, Nov 05 2001