cp's OEIS Frontend

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.

A286346 Expansion of eta(q)^24 / eta(q^2)^12 in powers of q.

This page as a plain text file.
%I A286346 #33 Feb 21 2021 04:07:00
%S A286346 1,-24,264,-1760,7944,-25872,64416,-133056,253704,-472760,825264,
%T A286346 -1297056,1938336,-2963664,4437312,-6091584,8118024,-11368368,
%U A286346 15653352,-19822176,24832944,-32826112,42517728,-51425088,61903776,-78146664,98021616,-115331264,133522752
%N A286346 Expansion of eta(q)^24 / eta(q^2)^12 in powers of q.
%H A286346 Seiichi Manyama, <a href="/A286346/b286346.txt">Table of n, a(n) for n = 0..10000</a>
%H A286346 Simon Plouffe, <a href="http://vixra.org/abs/1409.0048">Conjectures of the OEIS, as of June 20, 2018.</a>
%F A286346 a(n) = (-1)^n * A000145(n).
%F A286346 Euler Transform of [-24, -12, -24, -12, -24, -12, -24, -12, ...]. - _Simon Plouffe_, Jun 23 2018
%t A286346 nmax = 20; CoefficientList[Series[Product[((1 - x^k)/(1 + x^k))^12, {k, 1, nmax}], {x, 0, nmax}], x] (* _Vaclav Kotesovec_, Jul 10 2018 *)
%t A286346 a[n_] := (-1)^n SquaresR[12, n];
%t A286346 a /@ Range[0, 30] (* _Jean-François Alcover_, Feb 21 2021 *)
%o A286346 (PARI) q = 'q + O('q^50); Vec(eta(q)^24 / eta(q^2)^12) \\ _Michel Marcus_, Jul 07 2018
%Y A286346 Cf. A000145, A013973 (E_6).
%K A286346 sign
%O A286346 0,2
%A A286346 _Seiichi Manyama_, May 08 2017