login

Year-end appeal: Please make a donation to the OEIS Foundation to support ongoing development and maintenance of the OEIS. We are now in our 61st year, we have over 378,000 sequences, and we’ve reached 11,000 citations (which often say “discovered thanks to the OEIS”).

A145628
Numerator of the polynomial A_l(x) = sum_{d=1..l-1} x^(l-d)/d for index l=2n+1 evaluated at x=11.
1
253, 184195, 111439537, 188778591353, 68526628697791, 8291722072462741, 13042878819984222253, 3156376674436182358799, 6492666819315227120658143, 2985328203521141430107897005, 361224712626058113043082041693
OFFSET
1,1
COMMENTS
For denominators see A145630. For general properties of A_l(x) see A145609.
MATHEMATICA
m = 11; aa = {}; Do[k = 0; Do[k = k + m^(2 r + 1 - d)/d, {d, 1, 2 r}]; AppendTo[aa, Numerator[k]], {r, 1, 25}]; aa (* Artur Jasinski *)
a[n_, m_]:=Integrate[(m-x^n)/(m-x), {x, 0, 1}]+(m^n-m)Log[m/(m-1)]
Table[11 a[2 n, 11] // FullSimplify // Numerator, {n, 1, 25}] (* Gerry Martens , Jun 04 2016*)
CROSSREFS
Sequence in context: A006060 A077695 A253880 * A237419 A363866 A243666
KEYWORD
frac,nonn
AUTHOR
Artur Jasinski, Oct 14 2008
EXTENSIONS
Edited by R. J. Mathar, Aug 21 2009
STATUS
approved