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 A282854 #21 Feb 10 2023 04:54:12
%S A282854 0,1,34,99,196,325,486,679,904,1161,1450,1771,2124,2509,2926,3375,
%T A282854 3856,4369,4914,5491,6100,6741,7414,8119,8856,9625,10426,11259,12124,
%U A282854 13021,13950,14911,15904,16929,17986,19075,20196,21349,22534,23751
%N A282854 34-gonal numbers: a(n) = n*(32*n-30)/2.
%H A282854 <a href="/index/Pol#polygonal_numbers">Index to sequences related to polygonal numbers</a>
%H A282854 <a href="/index/Rec#order_03">Index entries for linear recurrences with constant coefficients</a>, signature (3,-3,1).
%F A282854 From _Nikolaos Pantelidis_, Feb 09 2023 : (Start)
%F A282854 G.f.: x*(1 + 31*x)/(1 - x)^3.
%F A282854 E.g.f.: exp(x)*(x + 16*x^2). (End)
%t A282854 Table[n(32n-30)/2, {n,50}]
%t A282854 PolygonalNumber[34,Range[0,40]] (* or *) LinearRecurrence[{3,-3,1},{0,1,34},40] (* The first program requires Mathematica version 10 or later *) (* _Harvey P. Dale_, Jun 26 2018 *)
%o A282854 (PARI) a(n)=n*(16*n-15) \\ _Charles R Greathouse IV_, Feb 27 2017
%Y A282854 Cf. A246645, A254474, A261191.
%K A282854 nonn,easy
%O A282854 0,3
%A A282854 _Daniel Mohebiravesh_, Feb 23 2017