1,1
Do[ If[ PrimeQ[ 2^n + 19 ], Print[ n ] ], {n, 1, 15000} ]
Sequence in context: A192446 A005432 A009422 * A180892 A196497 A127115
Adjacent sequences: A057218 A057219 A057220 * A057222 A057223 A057224
nonn
Robert G. Wilson v (rgwv(AT)rgwv.com), Sep 17 2000