%I #4 Mar 31 2012 10:22:14
%S 1,1,5,70,7,77,1001,20020,255255,1616615,1616615,74364290,185910725,
%T 79676025,770201575,191009990600,2170568075,45581929575,562177131425,
%U 1124354262850,3292751769775,1557471587103575,1557471587103575
%N Denominator of the polynomial A_l(x) = sum_{d=1..l-1} x^(l-d)/d for index l=2n+1 evaluated at x=12.
%C For numerators see A145631. For general properties of A_l(x) see A145609.
%t m = 12; aa = {}; Do[k = 0; Do[k = k + m^(2 r + 1 - d)/d, {d, 1, 2 r}]; AppendTo[aa, Denominator[k]], {r, 1, 30}]; aa (*Artur Jasinski*)
%Y Cf. A145609 - A145640.
%K frac,nonn
%O 1,3
%A _Artur Jasinski_, Oct 14 2008
%E Edited by _R. J. Mathar_, Aug 21 2009