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 A178118 #3 Mar 30 2012 17:34:41 %S A178118 0,1,1,2,7,25,100,469,2481,14406,90995,621553,4561112,35736921, %T A178118 297435521,2618575194,24297706927,236870849417,2419213831452, %U A178118 25820011544781,287327296473585,3326999636488190,40011485288491131 %N A178118 Antidiagonal sums of the triangle A060187. %C A178118 This sequence is an analog to the Lucas formula which obtains A000045 as the antidiagonal sums of the Pascal triangle A007318. %D A178118 David M. Burton, Elementary number theory, McGraw Hill (2002), page 286 %F A178118 a(n) = sum_{m=0.. floor[(n-1)/2]} A060187(n-m-1,m). %t A178118 p[x_, n_] = (1 - x)^(n + 1)*Sum[(2*k + 1)^n*x^k, {k, 0, Infinity}]; %t A178118 f[n_, m_] := CoefficientList[FullSimplify[ExpandAll[p[x, n]]], x][[m + 1]] %t A178118 a[n_] := Sum[f[n - m - 1, m], {m, 0, Floor[(n - 1)/2]}] %t A178118 Table[a[n], {n, 0, 30}] %Y A178118 Cf. A000800, A060187, A000045 %K A178118 nonn %O A178118 0,4 %A A178118 _Roger L. Bagula_, May 20 2010 %E A178118 Exact definition moved to formula - the Assoc. Eds. of the OEIS, Aug 20 2010