%I #11 Aug 16 2017 04:10:13
%S 46080,1290240,82575360,8918138880,1426902220800,313918488576000,
%T 90408524709888000,32908702994399232000,14743098941490855936000,
%U 7961273428405062205440000,5095214994179239811481600000
%N Denominators in the series for Bessel function J6(x).
%H G. C. Greubel, <a href="/A061405/b061405.txt">Table of n, a(n) for n = 0..220</a> (terms 0..50 from T. D. Noe)
%H <a href="/index/Be#Bessel">Index entries for sequences related to Bessel functions or polynomials</a>
%t Denominator[Take[CoefficientList[Series[BesselJ[6, x], {x, 0, 500}], x], {7, -1, 2}]] (* _G. C. Greubel_, Aug 15 2017 *)
%Y J1: A002474, J2: A002506, J3: A014401 for formula etc.
%K nonn,easy
%O 0,1
%A _Frank Ellermann_, Jun 11 2001