cp's OEIS Frontend

This is a front-end for the Online Encyclopedia of Integer Sequences, made by Christian Perfect. The idea is to provide OEIS entries in non-ancient HTML, and then to think about how they're presented visually. The source code is on GitHub.

A100519 Denominator of Sum_{k=0..n} 1/binomial(n,k)^3.

This page as a plain text file.
%I A100519 #8 Jul 07 2022 02:19:34
%S A100519 1,1,8,27,864,500,43200,1157625,42875,571536,8001504000,61631955,
%T A100519 10650001824000,8526987612000,13865513485824,91398648466125,
%U A100519 83564478597600,4927753743913000,4421332282230864000,98559233902419862572,340556687709473664000
%N A100519 Denominator of Sum_{k=0..n} 1/binomial(n,k)^3.
%H A100519 G. C. Greubel, <a href="/A100519/b100519.txt">Table of n, a(n) for n = 0..750</a>
%F A100519 a(n) = denominator( Sum_{k=0..n} 1/binomial(n,k)^3 ).
%e A100519 1, 2, 17/8, 56/27, 1759/864, 1009/500, 86831/43200, 2322304/1157625, 85922/42875, 1144667/571536, 16019198113/8001504000, 123357293/61631955, ... = A100518/A100519.
%t A100519 Table[Denominator[Sum[1/Binomial[n,k]^3, {k,0,n}]], {n,0,30}] (* _G. C. Greubel_, Jun 24 2022 *)
%o A100519 (Magma) [Denominator( (&+[1/Binomial(n,k)^3: k in [0..n]]) ): n in [0..30]]; // _G. C. Greubel_, Jun 24 2022
%o A100519 (SageMath) [denominator(sum(1/binomial(n,k)^3 for k in (0..n))) for n in (0..30)] # _G. C. Greubel_, Jun 24 2022
%o A100519 (PARI) a(n) = denominator(sum(k=0, n, 1/binomial(n,k)^3)); \\ _Michel Marcus_, Jun 25 2022
%Y A100519 Cf. A046825, A100516, A100517, A100518.
%K A100519 nonn,frac
%O A100519 0,3
%A A100519 _N. J. A. Sloane_, Nov 25 2004