1,2
Do[ If[ PrimeQ[ 5*3^n - 2 ], Print[ n ] ], {n, 1, 4200} ]
Adjacent sequences: A058588 A058589 A058590 this_sequence A058592 A058593 A058594
Sequence in context: A132142 A045751 A047267 this_sequence A059009 A026179 A105107
nonn
Robert G. Wilson v (rgwv(AT)rgwv.com), Dec 26 2000
Search completed in 0.002 seconds