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 A318124 #6 Aug 19 2018 07:25:02 %S A318124 1,1,2,9,31,127,494,1994,8040,32741,133855,549775,2266756,9372300, %T A318124 38862245,161500403,672538548,2805669061,11723319333,49055511943, %U A318124 205534846202,862167483656,3620429584614,15217780335870,64022149180478,269566679312520,1135878674712355 %N A318124 a(n) = [x^n] exp(Sum_{k>=1} (-1)^(k+1)*x^k*(1 + (n - 3)*x^k)/(k*(1 - x^k)^3)). %C A318124 For n > 2, a(n) is the n-th term of the weigh transform of n-gonal numbers. %H A318124 N. J. A. Sloane, <a href="/transforms.txt">Transforms</a> %H A318124 <a href="/index/Pol#polygonal_numbers">Index to sequences related to polygonal numbers</a> %F A318124 a(n) ~ c * d^n / sqrt(n), where d = 4.2950655312028649462400... and c = 0.204576644650802181512... - _Vaclav Kotesovec_, Aug 19 2018 %t A318124 Table[SeriesCoefficient[Exp[Sum[(-1)^(k + 1) x^k (1 + (n - 3) x^k)/(k (1 - x^k)^3), {k, 1, n}]], {x, 0, n}], {n, 0, 26}] %Y A318124 Cf. A027998, A028377, A294102, A294836, A294837, A294838, A318118, A318125. %K A318124 nonn %O A318124 0,3 %A A318124 _Ilya Gutkovskiy_, Aug 18 2018