|
%I #16 Oct 29 2019 06:06:32
%S 1,1,3,31,1255,161671,75481581,121338954577,734884394666535,
%T 15970479086714049751,1347242827078365957146473,
%U 415839472158527880691583531617,507266883682599825619985300960971525,2284735689605775548174387143718048664963601
%N a(n) = Sum_{i=0..n} (-1)^(n-i)*binomial(n,i)*Sum_{j=0..i} binomial(i,j)^n.
%H Seiichi Manyama, <a href="/A328811/b328811.txt">Table of n, a(n) for n = 0..59</a>
%F a(n) ~ A167010(n). - _Vaclav Kotesovec_, Oct 28 2019
%t Table[Sum[(-1)^(n-i)*Binomial[n, i]*Sum[Binomial[i, j]^n, {j, 0, i}], {i, 0, n}], {n, 0, 15}] (* _Vaclav Kotesovec_, Oct 28 2019 *)
%o (PARI) {a(n) = sum(i=0, n, (-1)^(n-i)*binomial(n, i)*sum(j=0, i, binomial(i, j)^n))}
%Y Main diagonal of A328747.
%Y Cf. A167010, A328810.
%K nonn
%O 0,3
%A _Seiichi Manyama_, Oct 28 2019
|
