1,2
Do[ If[ PrimeQ[ 7*2^n + 5 ], Print[ n ] ], {n, 1, 6800} ]
Sequence in context: A006794 A032457 A122564 this_sequence A086284 A136500 A024897
Adjacent sequences: A058592 A058593 A058594 this_sequence A058596 A058597 A058598
nonn
Robert G. Wilson v (rgwv(AT)rgwv.com), Dec 26 2000
Search completed in 0.002 seconds