A075290 Interprimes which are of the form s*prime, s=15.
30, 45, 105, 165, 195, 465, 615, 645, 705, 885, 915, 1095, 1695, 2085, 2685, 2955, 2985, 3165, 3345, 3495, 3615, 3945, 4065, 4155, 4755, 5055, 5235, 5505, 6645, 6735, 8445, 8655, 8805, 8985, 9465, 9885, 9915, 10155, 10245, 10635, 10785, 11085
Offset: 1
Examples
105 is an interprime and 105/15 = 7 is prime.
Programs
-
Mathematica
s=15; Select[Table[(Prime[n+1]+Prime[n])/2, {n, 2, 4000}], PrimeQ[ #/s]&]
Comments