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.
%I A145627 #9 Jun 05 2016 23:34:15 %S A145627 105,63215,1053605,2950094435,663771248638,1460296747017355, %T A145627 135598983651622355,108479186921297959075,15367884813850544296195, %U A145627 29198981146316034164367667,3406547800403537319177914415 %N A145627 Numerator of the polynomial A_l(x) = sum_{d=1..l-1} x^(l-d)/d for index l=2n+1 evaluated at x=10. %C A145627 For denominators see A145629. For general properties of A_l(x) see A145609. %t A145627 m = 10; 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_ *) %t A145627 a[n_,m_]:=Integrate[(m-x^n)/(m-x),{x,0,1}]+(m^n-m)Log[m/(m-1)] %t A145627 Table[10 a[2 n, 10] // FullSimplify // Numerator, {n,1,25}] (* _Gerry Martens_ , Jun 04 2016*) %Y A145627 Cf. A145609 - A145640. %K A145627 frac,nonn %O A145627 1,1 %A A145627 _Artur Jasinski_, Oct 14 2008 %E A145627 Edited by _R. J. Mathar_, Aug 21 2009