|
|
A190960
|
|
a(n) = 3*a(n-1) - 6*a(n-2), with a(0)=0, a(1)=1.
|
|
4
|
|
|
0, 1, 3, 3, -9, -45, -81, 27, 567, 1539, 1215, -5589, -24057, -38637, 28431, 317115, 780759, 439587, -3365793, -12734901, -18009945, 22379571, 175198383, 391317723, 122762871, -1979617725, -6675430401, -8148584853, 15606827847, 95711992659, 193495010895
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
0,3
|
|
LINKS
|
|
|
FORMULA
|
|
|
MATHEMATICA
|
LinearRecurrence[{3, -6}, {0, 1}, 50]
|
|
PROG
|
(PARI) x='x+O('x^30); concat([0], Vec(x/(1-3*x+6*x^2))) \\ G. C. Greubel, Jan 25 2018
(Magma) I:=[0, 1]; [n le 2 select I[n] else 3*Self(n-1) - 6*Self(n-2): n in [1..30]]; // G. C. Greubel, Jan 25 2018
|
|
CROSSREFS
|
Cf. A190958 (index to generalized Fibonacci sequences).
|
|
KEYWORD
|
sign
|
|
AUTHOR
|
|
|
STATUS
|
approved
|
|
|
|