-1728

Appears in sequences

• Coefficients in expansion of Eisenstein series E_2 (also called E_1 or G_2).at n=30A006352
• Coefficients in expansion of Eisenstein series E_2 (also called E_1 or G_2).at n=46A006352
• Determinant of Hankel matrix of the first 2n-1 prime numbers.at n=6A024356
• McKay-Thompson series of class 16B for the Monster group.at n=54A029839
• Expansion of g.f. Product_{n>=1} (1-x^n)*(1-x^(5*n))/(1-x^(3*n))^2.at n=44A054274
• Binomial transform, alternating in sign, of the tribonacci numbers.at n=19A073358
• McKay-Thompson series of class 16d for the Monster group.at n=54A082304
• Column 1 of triangle A104505, which is equal to the right-hand side of the triangle A084610 of coefficients in (1 + x - x^2)^n.at n=12A104506
• Triangular sequence from a Peters polynomials expansion: l0 = 2; m0 = 2; p(t) = (1 + t)^x/(1 + (1 + t)^l0)^m0.at n=26A137393
• A triangular sequence of three back recursive polynomial that are Hermite H(x,n) like and alternating orthogonal on domain {-Infinity,Infinity} and weight function Exp[ -x^2/2]: P(x, n) = 2*x*P(x, n - 1) - n*P(x, n - 2) + 4*x^3*P(x, n - 3).at n=33A138090
• A triangular sequence of four back recursive polynomial that are Hermite H(x,n) like and alternating orthogonal on domain {-Infinity,Infinity} and weight function Exp[ -x^2/2]: P(x, n) = 2*x*P(x, n - 1) - n*P(x, n - 2) + 4*x^3*P(x, n - 3)-n^2*P(x, n - 4).at n=33A138092
• Expansion of K(k) * (6 * E(k) - (1 + 4*k'^2) * K(k)) / (Pi/2)^2 in powers of q where E(k), K(k) are complete elliptic integrals and q = exp(-Pi * K(k') / K(k)).at n=30A143337
• Expansion of K(k) * (6 * E(k) - (1 + 4*k'^2) * K(k)) / (Pi/2)^2 in powers of q where E(k), K(k) are complete elliptic integrals and q = exp(-Pi * K(k') / K(k)).at n=46A143337
• A triangle sequence from matrix polynomials of a three symbol type {0, 1, -1}: c(i,k)= Floor[Mod[i/2^k, 2]]; M(d)=Table[If[Sum[c(n, k)*c(m, k), {k, 0, d - 1}] == 0, 1, If[Sum[c(n, k)*c(m, k), {k, 0, d - 1}] == 1, -1, 0]], {n, 0, d - 1}, {m, 0, d - 1}].at n=45A158417
• A triangle sequence from matrix polynomials of a three symbol type {0, 1, -1}: c(i,k)= Floor[Mod[i/2^k, 2]]; M(d)=Table[If[Sum[c(n, k)*c(m, k), {k, 0, d - 1}] == 0, 1, If[Sum[c(n, k)*c(m, k), {k, 0, d - 1}] == 1, -1, 0]], {n, 0, d - 1}, {m, 0, d - 1}].at n=46A158417
• Triangle T(n,k) which contains 8*n!*2^floor((n+1)/2) times the coefficient [t^n x^k] exp(t*x)/(7 + exp(4*t)) in row n, column k.at n=52A171684
• Array: row n shows the coefficients of the characteristic polynomial of the n-th principal submatrix of max(2i-1, 2j-1) (A204022).at n=21A204023
• Array: row n shows the coefficients of the characteristic polynomial of the n-th principal submatrix of the matrix at A204112, given by f(i,j) = gcd(F(i+1), F(j+1)), where F=A000045 (Fibonacci numbers).at n=23A204113
• Expansion of a(q)^2 * b(q) in powers of q where a(), b() are cubic AGM theta functions.at n=15A231948
• Expansion of b(q)^3 - 3*c(q)^3 in powers of q where b(), c() are cubic AGM theta functions.at n=5A231961