%I A145640
%S A145640 1,3,5,35,315,3465,45045,45045,255255,969969,29393,2028117,50702925,
%T A145640 456326325,13233463425,820474732350,4512611027925,4512611027925,
%U A145640 166966608033225,12843585233325,526586994566325,22643240766351975
%N A145640 Denominator the polynomial A_l(x) = sum_{d=1..l-1} x^(l-d)/d for index 
               l=2n+1 evaluated at x=16.
%C A145640 For numerators see A145639. For general properties of A_l(x) see A145609.
%t A145640 m = 16; 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 A145640 Cf. A145609 - A145640.
%Y A145640 Sequence in context: A057908 A120828 A077784 this_sequence A086158 A158878 
               A077779
%Y A145640 Adjacent sequences: A145637 A145638 A145639 this_sequence A145641 A145642 
               A145643
%K A145640 frac,nonn
%O A145640 1,2
%A A145640 Artur Jasinski (grafix(AT)csl.pl), Oct 14 2008
%E A145640 Edited by R. J. Mathar (mathar(AT)strw.leidenuniv.nl), Aug 21 2009