1,1

a={}; Do[x=14*n-1; If[PrimeQ[x], AppendTo[a, x]], {n, 10^2}]; a - Vladimir Orlovsky (4vladimir(AT)gmail.com), Apr 29 2008

Sequence in context: A043162 A043942 A004624 this_sequence A102083 A139866 A026918

Adjacent sequences: A045470 A045471 A045472 this_sequence A045474 A045475 A045476

nonn

N. J. A. Sloane (njas(AT)research.att.com).