1,3
Do[ If[ PrimeQ[(11*13^n - 1)/2], Print[n]], {n, 0, 2700}]
Sequence in context: A190329 A189522 A050904 * A099434 A191104 A108165
Adjacent sequences: A057468 A057469 A057470 * A057472 A057473 A057474
nonn
Robert G. Wilson v (rgwv(AT)rgwv.com), Sep 10 2000