|
|
A226201
|
|
a(n) = 8^n + n.
|
|
7
|
|
|
1, 9, 66, 515, 4100, 32773, 262150, 2097159, 16777224, 134217737, 1073741834, 8589934603, 68719476748, 549755813901, 4398046511118, 35184372088847, 281474976710672, 2251799813685265, 18014398509482002, 144115188075855891, 1152921504606846996
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
0,2
|
|
COMMENTS
|
|
|
LINKS
|
|
|
FORMULA
|
G.f.: (-1+x+7*x^2)/((8*x-1)*(x-1)^2).
a(n) = 10*a(n-1)-17*a(n-2)+8*a(n-3).
|
|
MATHEMATICA
|
Table[8^n + n, {n, 0, 30}] (* or *) CoefficientList[Series[(-1 + x + 7 x^2) / ((8 x - 1) (x - 1)^2), {x, 0, 30}], x]
LinearRecurrence[{10, -17, 8}, {1, 9, 66}, 30] (* Harvey P. Dale, Aug 11 2015 *)
|
|
PROG
|
(Magma) [8^n+n: n in [0..30]]; /* or */ I:=[1, 9, 66]; [n le 3 select I[n] else 10*Self(n-1)-17*Self(n-2)+8*Self(n-3): n in [1..30]];
|
|
CROSSREFS
|
|
|
KEYWORD
|
nonn,easy
|
|
AUTHOR
|
|
|
STATUS
|
approved
|
|
|
|