A161472 Primes of the form k^k-k-1.

23, 251, 3119, 46649, 387420479, 827240261886336764159, 341427877364219557396646723561, 100140253328453899494506997059845948876248360208192710258703340107188607793155063635811515105559240430619077757390331456723193970237417715907213278114795684814453039

Offset: 1

Author

Vladimir Joseph Stephan Orlovsky, Jun 10 2009

Keywords

• nonn

Comments

The associated k are in A065798. - R. J. Mathar, Jun 12 2009

Crossrefs

Cf. A065798.

Programs

Mathematica

lst={};Do[p=n^n-n-1;If[PrimeQ[p],AppendTo[lst,p]],{n,5!}];lst

Extensions

Definition simplified by R. J. Mathar, Jun 12 2009