1,2
Do[ If[ PrimeQ[ 2*5^n + 3 ], Print[ n ] ], {n, 1, 2000} ]
Sequence in context: A100901 A004791 A060112 this_sequence A057249 A155003 A021377
Adjacent sequences: A057911 A057912 A057913 this_sequence A057915 A057916 A057917
nonn
Robert G. Wilson v (rgwv(AT)rgwv.com), Nov 16 2000
Search completed in 0.002 seconds