|
%I #11 Sep 08 2022 08:45:41
%S 1,2,19,769,67333,9929106,2201420095,683765250589,283214405613321,
%T 150820803395086078,100389106493001087411,81663040762574177095289,
%U 79709457342800206602843277,91941570967455757927336110570,123717598784707453088183544702311
%N a(n) = Sum_{k=0..n} (k*n)^k.
%C Sums of rows of the triangle in A155955.
%H G. C. Greubel, <a href="/A155956/b155956.txt">Table of n, a(n) for n = 0..210</a>
%F a(n) = h(n,n) with h(n,k) = if k<0 then 0 otherwise n*h(n,k-1)+(n-k)^(n-k).
%t Table[Sum[(k*n)^k,{k,n}],{n,0,20}]+1 (* _Harvey P. Dale_, Apr 04 2017 *)
%o (Magma) [&+[(k*n)^k: k in [0..n]]: n in [0..20]]; // _Bruno Berselli_, Jul 04 2016
%o (PARI) vector(30, n, n--; sum(k=0,n, (k*n)^k)) \\ _G. C. Greubel_, Sep 14 2018
%Y Cf. A000312.
%K nonn
%O 0,2
%A _Reinhard Zumkeller_, Jan 31 2009
|
