A162927 Primes of the form n^n-2.
2, 823541, 1978419655660313589123977, 5842587018385982521381124419, 88817841970012523233890533447265623, 66009724686219550843768321818371771650147004059278069406814190436565131829325062447
Offset: 1
Keywords
Crossrefs
Main sequence is A100408.
Programs
-
Mathematica
f[n_]:=n^n-2; lst={};Do[If[PrimeQ[f[n]],AppendTo[lst,f[n]]],{n,5!}];lst Join[{2},Select[Table[n^n-2,{n,1,51,2}],PrimeQ]] (* Harvey P. Dale, Feb 12 2023 *)
Extensions
Cross-reference from Charles R Greathouse IV, Oct 08 2009