|
%I #15 Jan 10 2023 08:37:01
%S 1,2,8,92,1912,55042,2002834,87903418,4514068786,265401903136,
%T 17575711359576,1294325676386112,104913619501093500,
%U 9281271920245432932,889811788303594625412,91895379599481072720852,10170646981621794947354052,1200909691326112843842751962
%N a(n) = Sum_{k=0..n} binomial(k^2, k).
%H Seiichi Manyama, <a href="/A295773/b295773.txt">Table of n, a(n) for n = 0..338</a>
%F a(n) ~ exp(n - 1/2) * n^(n - 1/2) / sqrt(2*Pi).
%t Table[Sum[Binomial[k^2, k], {k, 0, n}], {n, 0, 20}]
%o (PARI) a(n) = sum(k=0, n, binomial(k^2, k)); \\ _Michel Marcus_, Jan 10 2019
%o (Magma) [&+[Binomial(k^2, k): k in [0..n]]: n in [0..20]]; // _Vincenzo Librandi_, Jan 10 2019
%Y Cf. A014062, A226391, A295772, A359665.
%K nonn
%O 0,2
%A _Vaclav Kotesovec_, Nov 27 2017
|
