|
|
A094836
|
|
a(n) = 2702*a(n-1) - a(n-2); a(-1) = -15; a(0) = 15.
|
|
1
|
|
|
-15, 15, 40545, 109552575, 296011017105, 799821658665135, 2161117825702177665, 5839339565225625385695, 15777893344121814089970225, 42631861976477576445474162255, 115191275282549067433857096442785, 311246783181585603728705429114242815
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
-1,1
|
|
COMMENTS
|
|
|
LINKS
|
|
|
FORMULA
|
|
|
MATHEMATICA
|
LinearRecurrence[{2702, -1}, {-15, 15}, 13] (* or *)
CoefficientList[Series[(15 + 15 x)/(1 - 2702 x + x^2), {x, 0, 13}], x] (* Michael De Vlieger, Jul 12 2017 *)
|
|
PROG
|
(PARI) concat(-15, Vec((15 + 15*x)/(1-2702*x+x^2) + O(x^20))) \\ Michel Marcus, Jul 09 2017
|
|
CROSSREFS
|
|
|
KEYWORD
|
sign,easy
|
|
AUTHOR
|
|
|
EXTENSIONS
|
|
|
STATUS
|
approved
|
|
|
|