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.

A167177 Expansion of 1/((1 +x +x^2)^2 *(1 +x^2 +x^3)^3).

This page as a plain text file.
%I A167177 #11 Oct 02 2023 11:37:38
%S A167177 1,-2,-2,5,5,-7,-13,2,29,19,-47,-68,43,151,31,-246,-237,267,611,-34,
%T A167177 -1078,-707,1327,2149,-701,-4118,-1760,5611,6904,-4361,-14463,-3123,
%U A167177 21453,20320,-20510,-47501,-426,76389,54711,-84119,-147200,30748,256922,132152,-315913,-432648,196632
%N A167177 Expansion of 1/((1 +x +x^2)^2 *(1 +x^2 +x^3)^3).
%H A167177 G. C. Greubel, <a href="/A167177/b167177.txt">Table of n, a(n) for n = 0..1000</a>
%H A167177 <a href="/index/Rec#order_13">Index entries for linear recurrences with constant coefficients</a>, signature (-2, -6, -11, -19, -27, -34, -38, -36, -30, -21, -12, -5, -1).
%F A167177 a(n) = -2*a(n-1) -6*a(n-2) -11*a(n-3) -19*a(n-4) -27*a(n-5) -34*a(n-6) -38*a(n-7) -36*a(n-8) -30*a(n-9) -21*a(n-10) -12*a(n-11) -5*a(n-12) -a(n-13).
%t A167177 a = {t^2 + t + 1, tau^2 + tau + 1, x^3 + x + 1, y^3 + y + 1, z^3 + z + 1} /. y -> x /. z -> x /. t -> x /. tau -> x
%t A167177 p[x_] = Product[a[[n]], {n, 1, 5}]
%t A167177 q[x_] = Expand[x^13*p[1/x]]
%t A167177 Table[ SeriesCoefficient[ Series[1/q[x], {x, 0, 30}], n], {n, 0, 30}]
%t A167177 CoefficientList[Series[1/((1 + x + x^2)^2*(1 + x^2 + x^3)^3), {x, 0, 100}], x] (* _G. C. Greubel_, Jun 04 2016 *)
%Y A167177 Cf. A099254.
%K A167177 sign
%O A167177 0,2
%A A167177 _Roger L. Bagula_, Oct 29 2009