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 A075277 #9 Jul 28 2017 09:56:18 %S A075277 4,6,26,34,86,134,254,274,334,386,446,566,974,1126,1226,1234,1286, %T A075277 1294,1546,2066,2374,2386,2554,2854,2906,2966,3086,3326,3694,3898, %U A075277 4054,4286,4594,4742,4846,4874,4954,5006,5218,5366,5686,5714,5854,6238,6274,6326 %N A075277 Interprimes (A024675) which are of the form s*prime, s=2. %C A075277 Interprimes which are of the form s*prime are in A075277-A075296 (s = 2-21). Case s = 1 is impossible. %H A075277 David A. Corneth, <a href="/A075277/b075277.txt">Table of n, a(n) for n = 1..10000</a> %e A075277 7646 is an interprime and 7646/2 = 3823 is prime. %t A075277 s=2; Select[Table[(Prime[n+1]+Prime[n])/2, {n, 2, 1000}], PrimeQ[ #/s]&] %o A075277 (PARI) first(n, {m=2}) = {my(res = List(), p); forprime(p=2, oo, if(precprime(m*p) + nextprime(m*p) == 2*m*p, listput(res, m*p); if(#res>=n,return(res))))} \\ _David A. Corneth_, Jul 26 2017 %Y A075277 Cf. A024675, A075277-A075296. %K A075277 easy,nonn %O A075277 1,1 %A A075277 _Zak Seidov_, Sep 12 2002