A162591 Primes in A007781.

3, 23, 229, 776887, 275311670611, 808793517812627212561, 47962816398523117606189726043968411848519304708598059350620557763277694737755820158580941773369740112983781265183299561695077810144494290292906506606685128216915382107158604900927276535058149770652889252352435564631

Offset: 1

Author

Vladimir Joseph Stephan Orlovsky, Jul 07 2009

Keywords

• nonn

Comments

See A072164 for a condensed representation of the same information.

Examples

			3^3-2^2=27-4=23 is prime and enters the list.
		

Crossrefs

Cf. A068955.

Programs

Mathematica

f[n_]:=n^n-(n-1)^(n-1); lst={};Do[If[PrimeQ[f[n]],AppendTo[lst,f[n]]], {n,2,5!}];lst

Extensions

Definition simplified, reference to A072164 and A068955 added by R. J. Mathar, Aug 11 2009