1,2
Do[ If[ PrimeQ[ 2^n - 21 ], Print[ n ] ], {n, 1, 3000} ]
Sequence in context: A063934 A062490 A032957 this_sequence A033059 A031876 A008725
Adjacent sequences: A057199 A057200 A057201 this_sequence A057203 A057204 A057205
nonn
Robert G. Wilson v (rgwv(AT)rgwv.com), Sep 16 2000
Search completed in 0.002 seconds