1,2

Do[If[PrimeQ[(12^n+7)], Print[n]], {n, 2000}]

Cf. A137652, A137654.

Sequence in context: A008319 A033311 A098504 this_sequence A021411 A005532 A026202

Adjacent sequences: A137650 A137651 A137652 this_sequence A137654 A137655 A137656

nonn

Zak Seidov (zakseidov(AT)yahoo.com), Feb 01 2008