login
Primes of the form 1 + 2^k + 4^k + 6^k.
1

%I #16 Mar 26 2019 16:20:33

%S 13,366993409,789800591806169089,

%T 8145612997113849913833354347764846494983651329

%N Primes of the form 1 + 2^k + 4^k + 6^k.

%C a(5) has 311 digits. - _Harvey P. Dale_, Mar 18 2019

%C Using the above, a(5) = 1 + 2^399 + 4^399 + 6^399. - _David A. Corneth_, Mar 18 2019

%e n=1: 1 + 2 + 4 + 6 = 13 is prime.

%t Do[s=1^w+2^w+4^w+6^w; If[IntegerQ[w/100], Print[{w}]]; If[PrimeQ[s], Print[{w, s}]], {w, 0, 1000}]

%t Select[Table[1+2^n+4^n+6^n,{n,60}],PrimeQ] (* _Harvey P. Dale_, Mar 18 2019 *)

%Y Cf. A081510.

%K nonn

%O 1,1

%A _Labos Elemer_, Apr 15 2003