|
|
A006124
|
|
a(n) = 3 + n/2 + 7*n^2/2.
|
|
2
|
|
|
3, 7, 18, 36, 61, 93, 132, 178, 231, 291, 358, 432, 513, 601, 696, 798, 907, 1023, 1146, 1276, 1413, 1557, 1708, 1866, 2031, 2203, 2382, 2568, 2761, 2961, 3168, 3382, 3603, 3831, 4066, 4308, 4557, 4813, 5076, 5346, 5623, 5907, 6198, 6496, 6801, 7113, 7432
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
0,1
|
|
LINKS
|
|
|
FORMULA
|
|
|
MATHEMATICA
|
CoefficientList[Series[(3-2*x+6*x^2)/(1-x)^3, {x, 0, 50}], x] (* Vincenzo Librandi, Jul 07 2012 *)
|
|
PROG
|
(Magma) I:=[3, 7, 18]; [n le 3 select I[n] else 3*Self(n-1)-3*Self(n-2)+Self(n-3): n in [1..50]]; // Vincenzo Librandi, Jul 07 2012
|
|
CROSSREFS
|
|
|
KEYWORD
|
nonn,easy
|
|
AUTHOR
|
|
|
STATUS
|
approved
|
|
|
|