%I #3 Mar 31 2012 10:22:03
%S 1,2,5,16,17,19,22,25,32,34,41,44,52,55,61,64,74,79,85,94,95,97,104,
%T 107,109,110,116,127,131,137,142,145,152,157,160,164,166,172,179,184,
%U 185,194,197,199
%N Numbers n for which 64n+63 is prime.
%t a = {}; Do[If[PrimeQ[64n + 63], AppendTo[a, n]], {n, 1, 200}]; a
%Y Cf. A127575, A127576, A127577, A127578, A127580, A127581.
%K nonn
%O 1,2
%A _Artur Jasinski_, Jan 19 2007
|