|
| |
|
|
A113919
|
|
Series expansion of elliptical invariant for the dodecahedron to 30 powers.
|
|
0
| | |
|
|
|
OFFSET
| 0,2
|
|
|
REFERENCES
| Elliptic Curves, McKean and Moll, 1997, Cambridge University Press, page 22
|
|
|
FORMULA
| b(n)=coefficent expansion of (-x^20 + 228*x^15 - 495*x^10 - 228*x^5 - 1)^3/(1728*x^5*(x^10 + 11*x^5 - 1)^5), a(n) = 1728*b(n)
|
|
|
MATHEMATICA
| b = 1728*Flatten[{{1/1728}, Table[Coefficient[Series[(-x^20 + 228*x^15 - 495*x^10 - 228*x^5 - 1)^3/(1728*x^5*(x^10 + 11*x^5 - 1)^5), {x, 0, 30}], x^n], {n, 1, 30}]}]
|
|
|
CROSSREFS
| Sequence in context: A175744 A024211 A204943 * A001379 A014708 A035230
Adjacent sequences: A113916 A113917 A113918 * A113920 A113921 A113922
|
|
|
KEYWORD
| nonn
|
|
|
AUTHOR
| Roger L. Bagula (rlbagulatftn(AT)yahoo.com), Jan 29 2006
|
| |
|
|
