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

%I #7 Sep 16 2015 00:36:43

%S 2,21,3005,818503,285271753811,302868879571453,827239906198908668177,

%T 1978419534015213180291979,20880467973995895295470056270567,

%U 2567686153152369372568088512776472510483469,17069174130715013119956465106241589193164734431

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

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

%t Table[Prime[n]^Prime[n] - Prime[n]!, {n, 1, 11}] (* _Stefan Steinerberger_, Feb 21 2006 *)

%t Table[p^p-p!,{p,Prime[Range[15]]}] (* _Harvey P. Dale_, Feb 03 2015 *)

%Y Cf. A036679.

%K easy,nonn

%O 1,1

%A _Giovanni Teofilatto_, Feb 20 2006

%E More terms from _Stefan Steinerberger_, Feb 21 2006