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 A098923 #40 Feb 10 2023 06:05:15 %S A098923 0,1,33,96,190,315,471,658,876,1125,1405,1716,2058,2431,2835,3270, %T A098923 3736,4233,4761,5320,5910,6531,7183,7866,8580,9325,10101,10908,11746, %U A098923 12615,13515,14446,15408,16401,17425,18480,19566,20683,21831,23010 %N A098923 33-gonal numbers: n(31n-29)/2. %C A098923 Similar to 21-gonal and 15-gonal numbers (A051873, A051867). %H A098923 Daniel Starodubtsev, <a href="/A098923/b098923.txt">Table of n, a(n) for n = 0..10000</a> %H A098923 <a href="/index/Pol#polygonal_numbers">Index to sequences related to polygonal numbers</a> %H A098923 <a href="/index/Rec#order_03">Index entries for linear recurrences with constant coefficients</a>, signature (3,-3,1). %F A098923 a(n) = n*(31*n-29)/2. %F A098923 G.f.: x*(1+30*x)/(1-x)^3. - _Bruno Berselli_, Feb 04 2011 %F A098923 a(n) = 31*n + a(n-1) - 30 (with a(0)=0). - _Vincenzo Librandi_, Nov 16 2010 %F A098923 E.g.f.: exp(x)*(x + 31*x^2/2). - _Nikolaos Pantelidis_, Feb 10 2023 %t A098923 Table[n(31n - 29)/2, {n, 0, 40}] (* _Stefan Steinerberger_, Feb 15 2006 *) %t A098923 PolygonalNumber[33,Range[0,40]] (* Requires Mathematica version 10 or later *) (* _Harvey P. Dale_, Mar 02 2018 *) %o A098923 (PARI) a(n)=n*(31*n-29)/2 \\ _Charles R Greathouse IV_, Oct 16 2015 %Y A098923 Cf. A051867, A051873. %K A098923 nonn,easy %O A098923 0,3 %A A098923 _Parthasarathy Nambi_, Oct 18 2004 %E A098923 More terms from _Stefan Steinerberger_, Feb 15 2006