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 A075296 #9 Jul 26 2017 15:49:22 %S A075296 42,105,231,399,483,861,987,1113,1281,1491,1869,2121,2247,2667,2751, %T A075296 3129,3423,5649,5691,5817,7539,8169,8421,8589,9807,10563,10689,10983, %U A075296 11361,13881,14511,14889,15519,17031,17409,18627,19761,20391,21189 %N A075296 Interprimes (A024675) which are of the form s*prime, s=21. %C A075296 Interprimes of the form s*prime are in A075277-A075296 ( s = 2 - 21 ). Case s=1 is impossible. %H A075296 David A. Corneth, <a href="/A075296/b075296.txt">Table of n, a(n) for n = 1..10000</a> %e A075296 231 is an interprime and 231/21 = 11 is prime. %t A075296 s=21; Select[Table[(Prime[n+1]+Prime[n])/2, {n, 2, 14000}], PrimeQ[ #/s]&] %o A075296 (PARI) first(n, {m=21}) = {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 A075296 Cf. A024675, A075277-A075296. %K A075296 easy,nonn %O A075296 1,1 %A A075296 _Zak Seidov_, Sep 12 2002