|
%I #5 Mar 04 2021 20:55:55
%S 1,1,17,179,6083,298583,20015947,2214261035,332014246747,
%T 64923646898023,17220997162396851,5898373172881341811,
%U 2513698997312409032785,1335813901379210302030497,875400777321767437156156305,692119702624591542667897216641,653524900495231808524498551469617
%N a(0) = 1; a(n) = Sum_{k=1..n} binomial(n,k)^4 * a(k-1).
%t a[0] = 1; a[n_] := a[n] = Sum[Binomial[n, k]^4 a[k - 1], {k, 1, n}]; Table[a[n], {n, 0, 16}]
%Y Cf. A040027, A061685, A336196, A342196, A342197, A342199.
%K nonn
%O 0,3
%A _Ilya Gutkovskiy_, Mar 04 2021
|
