A282851 35-gonal numbers: a(n) = n*(33*n-31)/2.
0, 1, 35, 102, 202, 335, 501, 700, 932, 1197, 1495, 1826, 2190, 2587, 3017, 3480, 3976, 4505, 5067, 5662, 6290, 6951, 7645, 8372, 9132, 9925, 10751, 11610, 12502, 13427, 14385, 15376, 16400, 17457, 18547, 19670, 20826, 22015, 23237, 24492
Offset: 0
Links
Programs
-
Mathematica
Table[n(33n-31)/2, {n, 50}] PolygonalNumber[35,Range[0,40]] (* Requires Mathematica version 10 or later *) (* Harvey P. Dale, Nov 12 2017 *) -
PARI
for(n=0,100,print1(n*(33*n-31)/2,", ")) \\ Derek Orr, Feb 27 2017
Formula
From Nikolaos Pantelidis, Feb 10 2023: (Start)
G.f.: x*(1 + 32*x)/(1 - x)^3.
E.g.f.: exp(x)*(x + 33*x^2/2). (End)