A173154 a(n) = n^3/6 + 3*n^2/4 + 7*n/3 + 7/8 + (-1)^n/8.
1, 4, 10, 19, 33, 52, 78, 111, 153, 204, 266, 339, 425, 524, 638, 767, 913, 1076, 1258, 1459, 1681, 1924, 2190, 2479, 2793, 3132, 3498, 3891, 4313, 4764, 5246, 5759, 6305, 6884, 7498, 8147, 8833, 9556, 10318, 11119, 11961, 12844, 13770, 14739, 15753, 16812, 17918, 19071, 20273, 21524
Offset: 0
Links
- Vincenzo Librandi, Table of n, a(n) for n = 0..10000
- Index entries for linear recurrences with constant coefficients, signature (3,-2,-2,3,-1).
Programs
-
Magma
[n^3/6 + 3*n^2/4 + 7*n/3 + 7/8 + (-1)^n/8: n in [0..50]]; // Vincenzo Librandi, Aug 05 2011
-
Mathematica
Table[n^3/6+(3n^2)/4+(7n)/3+7/8+(-1)^n/8,{n,0,50}] (* or *) LinearRecurrence[{3,-2,-2,3,-1},{1,4,10,19,33},50] (* Harvey P. Dale, Jan 04 2012 *)
Comments