A114846 Numbers of the form p^p - p!, where p is a prime.

2, 21, 3005, 818503, 285271753811, 302868879571453, 827239906198908668177, 1978419534015213180291979, 20880467973995895295470056270567, 2567686153152369372568088512776472510483469, 17069174130715013119956465106241589193164734431

Offset: 1

Author

Giovanni Teofilatto, Feb 20 2006

Keywords

• easy
• nonn

Comments

Except for the term 2, p^p - p! is equal to the sum of p distinct primes.

Crossrefs

Cf. A036679.

Programs

Mathematica

Table[Prime[n]^Prime[n] - Prime[n]!, {n, 1, 11}] (* Stefan Steinerberger, Feb 21 2006 *)
Table[p^p-p!,{p,Prime[Range[15]]}] (* Harvey P. Dale, Feb 03 2015 *)

Extensions

More terms from Stefan Steinerberger, Feb 21 2006