A162929 Primes of the form n^n+(n+1)^(n+1)+6.
11, 37, 49787, 404197711
Offset: 1
Keywords
Examples
2^2+3^3+6=37.
Programs
-
Mathematica
f[n_]:=n^n+(n+1)^(n+1)+6; lst={};Do[If[PrimeQ[f[n]],AppendTo[lst,f[n]]], {n,2*5!}];lst Select[Table[n^n+(n+1)^(n+1)+6,{n,500}],PrimeQ] (* Harvey P. Dale, Jan 30 2014 *)
Extensions
Edited by R. J. Mathar, Jul 19 2009
Comments