-636

Appears in sequences

• Alternating sum sigma(1)-sigma(2)+sigma(3)-sigma(4)+...+((-1)^(n+1))*sigma(n).at n=53A068762
• Square array of coefficients of binomial polynomials, read by antidiagonals.at n=33A080959
• Inverse of Riordan array (1/(1-x)^2,x(1-x)/(1+x)), A104698.at n=41A110271
• Expansion of psi(q^5)/psi(q) in powers of q where psi() is a Ramanujan theta function.at n=31A116494
• a(n) = a(n-2) - (a(n-1) - a(n-2)) if (n mod 2) = 0, otherwise a(n) = a(n-1) - (a(n-3) - a(n-4)), with a(0) = 0, a(1) = 1, a(2) = -1, a(3) = 2.at n=30A135690
• A McMullen transform involving x->x+1/x of Lehmer's polynomial gives the polynomial used to get this expansion sequence: p(x)=1 + x + 10 x^2 + 8 x^3 + 44 x^4 + 28 x^5 + 113 x^6 + 57 x^7 + 191 x^8 + 79 x^9 + 227 x^10 + 79 x^11 + 191 x^12 + 57 x^13 + 113 x^14 + 28 x^15 + 44 x^16 + 8 x^17 + 10 x^18 + x^19 + x^20.at n=10A143465
• Expansion of eta(q) * eta(q^10)^3 / (eta(q^2) * eta(q^4) * eta(q^5) * eta(q^20)) in powers of q.at n=63A147702
• A symmetrical triangle:t(n,m)=Binomial[PartitionsP[n] + m, m] + Binomial[PartitionsP[n] + n - m, n - m] - (Binomial[PartitionsP[n] + 0, 0] + Binomial[PartitionsP[ n] + n - 0, n - 0]) + 1.at n=17A176565
• A symmetrical triangle:t(n,m)=Binomial[PartitionsP[n] + m, m] + Binomial[PartitionsP[n] + n - m, n - m] - (Binomial[PartitionsP[n] + 0, 0] + Binomial[PartitionsP[ n] + n - 0, n - 0]) + 1.at n=18A176565
• Coefficient of x in the minimal polynomial of the continued fraction [1^n,sqrt(3),1,1,...], where 1^n means n ones.at n=3A266800
• First differences of number of active (ON, black) cells in n-th stage of growth of two-dimensional cellular automaton defined by "Rule 118", based on the 5-celled von Neumann neighborhood.at n=35A270188
• First differences of number of active (ON, black) cells in n-th stage of growth of two-dimensional cellular automaton defined by "Rule 294", based on the 5-celled von Neumann neighborhood.at n=41A271135
• First differences of number of active (ON, black) cells in n-th stage of growth of two-dimensional cellular automaton defined by "Rule 613", based on the 5-celled von Neumann neighborhood.at n=41A273244
• Coefficients in the expansion of ([s] + [2s]x + [3s]x^2 + ...)/([r] + [2r]x + [3r]x^2 + ...); [ ] = floor, r = e/2, s = r/(1-r).at n=18A279633
• Expansion of ((1 + 4*x + 8*x^2)^(3/2) - (1 + 6*x + 18*x^2 + 20*x^3)) / (2*x^4) in powers of x.at n=9A282876