A364075 Antidiagonal sums of A364074.
1, 3, 15, 190, 6410, 715632, 329228397, 642643955573, 5397009875581209, 229445611563324949690, 42191138284027801530473000, 46655044099184540456537140765334, 234194471368188917606391033927435435145, 7541601159871173209667556247111598350602865715, 1286007207921675504103355843697108982290866195893407427
Offset: 2
Keywords
Crossrefs
Cf. A364074.
Programs
-
Mathematica
A[m_,n_]:=Sum[Sum[Binomial[n,d]StirlingS2[n-d,i](m^(m-1)-1)^(n-d-i),{d,0,n-i}],{i,0,n}]; a[n_]=Sum[A[n-m+1,m],{m,0,n-2}]; Array[a,15,2]