A199192 Primes of the form 3^(2n-3)+3^(n-1)+1.
7, 37, 271, 2269, 19927, 129159847, 1162320517, 49269609804781974450852068861184694669, 589881151426658740854227725580736348850640632297373414091790995505756623268837
Offset: 1
Keywords
Programs
-
Mathematica
a={}; Do[p=( (3^(n-1) + 1)^3 -1)/3^n; If[PrimeQ[p], AppendTo[a, p]], {n, 10^2}]; Print[a]; Select[Table[3^(2n-3)+3^(n-1)+1,{n,100}],PrimeQ] (* Harvey P. Dale, May 28 2015 *)
Formula
Primes in A198410.
Comments