|
%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
|
