1,3
Do[ If[ PrimeQ[ 5*7^n + 6 ], Print[n] ], {n, 0, 5700} ]
Sequence in context: A002447 A007499 A117555 this_sequence A037397 A053350 A117342
Adjacent sequences: A059807 A059808 A059809 this_sequence A059811 A059812 A059813
nonn
Robert G. Wilson v (rgwv(AT)rgwv.com), Feb 24 2001
Search completed in 0.002 seconds