A138956 Primes of the form (4^n + 5^n)/9.
461, 10501, 2149818248341, 20728082811027490541, 481868222983777875077033646523111996342381, 63774650109719491827977851592475862662743267652837460857617262084586443004114519194264814815101
Offset: 1
Keywords
Crossrefs
Cf. A128335.
Programs
-
Mathematica
a={}; Do[p=(4^n+5^n)/9; If[PrimeQ[p], AppendTo[a, p]], {n, 1, 12^2}];a Select[Table[(4^n+5^n)/9,{n,160}],PrimeQ] (* Harvey P. Dale, Oct 22 2011 *)