This is a front-end for the Online Encyclopedia of Integer Sequences, made by Christian Perfect. The idea is to provide OEIS entries in non-ancient HTML, and then to think about how they're presented visually. The source code is on GitHub.
%I A290152 #22 Mar 11 2023 06:39:47 %S A290152 1,168,-12636,392832,-7335174,92207808,-804651624,4626614784, %T A290152 -11834988165,-73870961696,1115908456740,-7498139072256, %U A290152 32630722986078,-90379426346496,94395618447768,450271639673856,-2625847472007243,6203580643521072,-3151366507609936 %N A290152 Coefficients in expansion of E_4*Delta^3 where Delta is the generating function of Ramanujan's tau function (A000594). %H A290152 Seiichi Manyama, <a href="/A290152/b290152.txt">Table of n, a(n) for n = 3..1000</a> %H A290152 S. C. Milne, <a href="https://arxiv.org/abs/math/0009130">Hankel determinants of Eisenstein series</a>, preprint, arXiv:0009130 [math.NT], 2000. %F A290152 Let b(q) be the determinant of the 4 X 4 Hankel matrix [E_4, E_6, E_8, E_10 ; E_6, E_8, E_10, E_12 ; E_8, E_10, E_12, E_14 ; E_10, E_12, E_14, E_16]. G.f. is -691^3*3617*b(q)/(1728^3*2^4*3*5^6*7^2*467). %t A290152 terms = 19; %t A290152 E4[x_] = 1 + 240*Sum[k^3*x^k/(1 - x^k), {k, 1, terms}]; %t A290152 E4[x]*QPochhammer[x]^(3*24) + O[x]^terms // CoefficientList[#, x]& (* _Jean-François Alcover_, Feb 26 2018 *) %Y A290152 Cf. A000594, A004009 (E_4). %Y A290152 Cf. A290048, A290178. %K A290152 sign %O A290152 3,2 %A A290152 _Seiichi Manyama_, Jul 21 2017