|
%I #6 Mar 30 2012 17:26:03
%S 473,803,1243,2453,5093,9097,16753,17897,18953,22297,26147,26807,
%T 27247,28369,32197,35387,36773,38797,42163,44803,49423,53933,60533,
%U 66077,66319,66803,68189,68233,69157,69773,72083,72347,79343,80663
%N Interprimes which are of the form s*prime, s=11.
%C Interprimes of the form s*prime are in A075277-A075296 ( s = 2 - 21 ). Case s=1 is impossible.
%e 1243 is an interprime and 1243/11 = 113 is prime.
%t s=11; Select[Table[(Prime[n+1]+Prime[n])/2, {n, 2, 4000}], PrimeQ[ #/s]&]
%Y Cf. A075277-A075296.
%K easy,nonn
%O 1,1
%A _Zak Seidov_, Sep 12 2002
|
