OFFSET
0,3
LINKS
FORMULA
From Nikolaos Pantelidis, Feb 09 2023 : (Start)
G.f.: x*(1 + 31*x)/(1 - x)^3.
E.g.f.: exp(x)*(x + 16*x^2). (End)
MATHEMATICA
Table[n(32n-30)/2, {n, 50}]
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 *)
PROG
(PARI) a(n)=n*(16*n-15) \\ Charles R Greathouse IV, Feb 27 2017
CROSSREFS
KEYWORD
nonn,easy
AUTHOR
Daniel Mohebiravesh, Feb 23 2017
STATUS
approved