1,2
Do[ If[ PrimeQ[ 3*5^n + 2 ], Print[ n ] ], {n, 1, 2000} ]
Sequence in context: A079257 A001609 A101590 this_sequence A007606 A047311 A076138
Adjacent sequences: A057913 A057914 A057915 this_sequence A057917 A057918 A057919
nonn
Robert G. Wilson v (rgwv(AT)rgwv.com), Nov 16 2000
Search completed in 0.002 seconds