1,2
Do[ If[ PrimeQ[ 5*2^n + 7 ], Print[n] ], {n, 1, 3000} ]
Sequence in context: A085493 A139252 A076245 this_sequence A122124 A007665 A062488
Adjacent sequences: A059745 A059746 A059747 this_sequence A059749 A059750 A059751
nonn
Robert G. Wilson v (rgwv(AT)rgwv.com), Feb 10 2001
Search completed in 0.002 seconds