1,2
a={}; Do[x=8*n-1; If[PrimeQ[x], AppendTo[a, n]], {n, 10^2}]; a - Vladimir Orlovsky (4vladimir(AT)gmail.com), Apr 29 2008
Sequence in context: A050131 A089986 A101448 this_sequence A166161 A034706 A054686
Adjacent sequences: A005119 A005120 A005121 this_sequence A005123 A005124 A005125
nonn
N. J. A. Sloane (njas(AT)research.att.com).
Search completed in 0.002 seconds