1,3
Do[ If[ PrimeQ[ 2*7^n + 3 ], Print[n] ], {n, 1, 6000} ]
Sequence in context: A014211 A160911 A092764 this_sequence A121134 A144959 A131347
Adjacent sequences: A059072 A059073 A059074 this_sequence A059076 A059077 A059078
nonn
Robert G. Wilson v (rgwv(AT)rgwv.com), Feb 12 2001
Search completed in 0.002 seconds