|
%I #6 Mar 24 2014 02:07:12
%S 1,4,6,10,15,18,21,24,25,27,28,33,40,42,46,49,52,54,57,60,63,64,66,69,
%T 70,75,76,81,82,88,91,94,99,102,105,106,115,117,118,120,123,129,130,
%U 132,136,138,145,147,148,153,160,162,172,174,180,183,186,187,190,195,201
%N Nonprimes m such that 10m + 1 are primes.
%C Corresponding values of 10m + 1 in A179446.
%t Select[Complement[Range[500],Prime[Range[PrimePi[500]]]],PrimeQ[10#+1]&] (* _Harvey P. Dale_, Jul 28 2010 *)
%K nonn
%O 1,2
%A _Jaroslav Krizek_, Jul 14 2010
%E More terms from _Harvey P. Dale_, Jul 28 2010
|
