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 A109562 #5 Jun 03 2025 01:08:08
%S A109562 293,1069,1259,1637,2311,2557,3229,3469,3739,3967,4027,4177,4523,4759,
%T A109562 5237,6173,6397,6737,7079,7369,7793,8123,8329,9067,11213,11551,12011,
%U A109562 12347,13339,14563,14593,14897,16273,16843,18013,18919,20563,21031,21283,21347,21529
%N A109562 prime(k) for those k where floor((2*(prime(k+1)-prime(k))*PrimePi(k) mod (8*k))/k) = m with m = 8.
%t A109562 a = Flatten[Table[If[Floor[2*Mod[(Prime[n + 1] - Prime[n])*PrimePi[n]/n, 8]] == 8, Prime[n], {}], {n, 1, 400}]]
%Y A109562 Cf. A000040, A000720, A001359.
%Y A109562 Cf. A109556-A109569 for m = 2..15.
%K A109562 nonn,less
%O A109562 1,1
%A A109562 _Roger L. Bagula_, Jun 27 2005
%E A109562 Name edited, offset corrected and more terms added by _Amiram Eldar_, Jun 02 2025