A179986 Second 9-gonal (or nonagonal) numbers: a(n) = n*(7*n+5)/2.
0, 6, 19, 39, 66, 100, 141, 189, 244, 306, 375, 451, 534, 624, 721, 825, 936, 1054, 1179, 1311, 1450, 1596, 1749, 1909, 2076, 2250, 2431, 2619, 2814, 3016, 3225, 3441, 3664, 3894, 4131, 4375, 4626, 4884, 5149, 5421, 5700, 5986, 6279, 6579, 6886
Offset: 0
Links
- Vincenzo Librandi, Table of n, a(n) for n = 0..1000
- Index entries for linear recurrences with constant coefficients, signature (3,-3,1).
Crossrefs
Programs
-
Magma
[n*(7*n+5)/2: n in [0..50]]; // Bruno Berselli, Sep 23 2016
-
Magma
I:=[0, 6, 19]; [n le 3 select I[n] else 3*Self(n-1) -3*Self(n-2) +Self(n-3): n in [1..60]]; // Vincenzo Librandi, Oct 15 2012
-
Mathematica
f[n_] := n (7 n + 5)/2; f[Range[0, 60]] (* Vladimir Joseph Stephan Orlovsky, Feb 05 2011*) LinearRecurrence[{3, -3, 1}, {0, 6, 19}, 60] (* or *) Array[(#(7# + 5))/2&, 60, 0] (* Harvey P. Dale, Aug 19 2011 *) CoefficientList[Series[x (6 + x)/(1 - x)^3, {x, 0, 60}], x] (* Vincenzo Librandi, Oct 15 2012 *)
-
PARI
a(n)=n*(7*n+5)/2 \\ Charles R Greathouse IV, Sep 24 2015
Formula
G.f.: x*(6 + x)/(1 - x)^3.
a(n) = Sum_{i=0..(n-1)} A017053(i) for n>0.
a(-n) = A001106(n).
Sum_{i=0..n} (a(n)+i)^2 = ( Sum_{i=(n+1)..2*n} (a(n)+i)^2 ) + 21*A000217(n)^2 for n>0.
a(n) = a(n-1)+7*n-1 for n>0, with a(0)=0. - Vincenzo Librandi, Feb 05 2011
a(0)=0, a(1)=6, a(2)=19; for n>2, a(n) = 3*a(n-1)-3*a(n-2)+a(n-3). - Harvey P. Dale, Aug 19 2011
a(n) = A174738(7n+5). - Philippe Deléham, Mar 26 2013
E.g.f.: (x/2)*(12 + 7*x)*exp(x). - G. C. Greubel, Aug 19 2017
Comments