|
|
A051028
|
|
Ramanujan's a-series: expansion of (1+53x+9x^2)/(1-82x-82x^2+x^3).
|
|
7
|
|
|
1, 135, 11161, 926271, 76869289, 6379224759, 529398785665, 43933719985479, 3645969360009049, 302571523160765631, 25109790452983538281, 2083810036074472911735, 172931123203728268135681, 14351199415873371782349831, 1190976620394286129666900249
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
0,2
|
|
COMMENTS
|
|
|
LINKS
|
|
|
FORMULA
|
G.f.: (1+53*x+9*x^2)/((1+x)*(1-83*x+x^2)).
X(n+1) = AX(n), where X(n) = transpose(A051028(n), A051029(n), A051030(n)) and A = matrix(3,3,[63,104,-68; 64,104,-67; 80,131,-85)]). - Emeric Deutsch, Oct 14 2006
|
|
MAPLE
|
g:=(1+53*x+9*x^2)/(1-82*x-82*x^2+x^3): gser:=series(g, x=0, 20): seq(coeff(gser, x, n), n=0..12); # Emeric Deutsch, Oct 14 2006
|
|
MATHEMATICA
|
CoefficientList[Series[(1 + 53 x + 9 x^2)/(1 - 82 x - 82 x^2 + x^3), {x, 0, 33}], x] (* Vincenzo Librandi, Jul 22 2015 *)
|
|
PROG
|
(PARI) Vec((1+53*x+9*x^2)/(1-82*x-82*x^2+x^3) + O(x^30)) \\ Michel Marcus, Feb 29 2016
|
|
CROSSREFS
|
|
|
KEYWORD
|
nonn,easy
|
|
AUTHOR
|
|
|
EXTENSIONS
|
|
|
STATUS
|
approved
|
|
|
|