A282540 Eisenstein series E_32(q) (alternate convention E_16(q)), multiplied by 7709321041217.
7709321041217, 32640, 70093866303360, 20160859654708062720, 150525431711563807489920, 151991844177246093750032640, 43295116458269350559666465280, 5149788469617367127914995164160, 323250903208723929093223124860800
Offset: 0
Keywords
Links
- Seiichi Manyama, Table of n, a(n) for n = 0..10000
Crossrefs
Cf. A006352 (E_2), A004009 (E_4), A013973 (E_6), A008410 (E_8), A013974 (E_10), A029828 (691*E_12), A058550 (E_14), A029829 (3617*E_16), A279892 (43867*E_18), A029830 (174611*E_20), A279893 (77683*E_22), A029831 (236364091*E_24), A282356 (657931*E_26), A282401 (3392780147*E_28), A282182 (1723168255201*E_30), this sequence (7709321041217*E_32).
Programs
-
Mathematica
terms = 9; E32[x_] = 7709321041217 + 32640*Sum[k^31*x^k/(1 - x^k), {k, 1, terms}]; E32[x] + O[x]^terms // CoefficientList[#, x]& (* Jean-François Alcover, Feb 26 2018 *)