login
Eisenstein series E_26(q) (alternate convention E_13(q)), multiplied by 657931.
4

%I #16 Feb 26 2018 17:23:23

%S 657931,-24,-805306392,-20334926626656,-27021598569529368,

%T -7152557373046875024,-682326933054044766048,-32185646871935157619392,

%U -906694391732570450559000,-17229551704624797057112632,-240000007152557373852181392

%N Eisenstein series E_26(q) (alternate convention E_13(q)), multiplied by 657931.

%H Seiichi Manyama, <a href="/A282356/b282356.txt">Table of n, a(n) for n = 0..1000</a>

%H <a href="/index/Ed#Eisen">Index entries for sequences related to Eisenstein series</a>

%F a(n) = 392931*A282048(n) + 265000*A282357(n).

%t terms = 11;

%t E26[x_] = 657931 - 24*Sum[k^25*x^k/(1 - x^k), {k, 1, terms}];

%t E26[x] + O[x]^terms // CoefficientList[#, x]& (* _Jean-François Alcover_, Feb 26 2018 *)

%Y 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), this sequence (657931*E_26).

%Y Cf. A282048 (E_4^5*E_6), A282357 (E_4^2*E_6^3).

%K sign

%O 0,1

%A _Seiichi Manyama_, Feb 13 2017