|
|
A010019
|
|
a(0) = 1, a(n) = 29*n^2 + 2 for n>0.
|
|
1
|
|
|
1, 31, 118, 263, 466, 727, 1046, 1423, 1858, 2351, 2902, 3511, 4178, 4903, 5686, 6527, 7426, 8383, 9398, 10471, 11602, 12791, 14038, 15343, 16706, 18127, 19606, 21143, 22738, 24391, 26102, 27871, 29698, 31583, 33526, 35527, 37586, 39703, 41878, 44111, 46402
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
0,2
|
|
LINKS
|
|
|
FORMULA
|
|
|
MATHEMATICA
|
Join[{1}, LinearRecurrence[{3, -3, 1}, {31, 118, 263}, 50]] (* Vincenzo Librandi, Aug 03 2015 *)
|
|
PROG
|
(PARI) a(n)=polcoeff((x*(x+1)*29+2)*exp(x+O(x^(n+1)))-1, n)*n! /* to illustrate the e.g.f. */
|
|
CROSSREFS
|
Cf. similar sequences listed in A206399.
|
|
KEYWORD
|
nonn,easy
|
|
AUTHOR
|
|
|
STATUS
|
approved
|
|
|
|