1,2
Do[ If[ PrimeQ[ 3*13^n - 2 ], Print[ n ] ], {n, 0, 1500} ]
Sequence in context: A041046 A041117 A041491 this_sequence A042121 A123082 A084037
Adjacent sequences: A058022 A058023 A058024 this_sequence A058026 A058027 A058028
nonn
Robert G. Wilson v (rgwv(AT)rgwv.com), Nov 15 2000
Search completed in 0.002 seconds