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 A122167 #24 Jun 02 2025 00:30:10 %S A122167 1,-3,3,-11,10,-40,33,-146,107,-535,339,-1968,1040,-7267,3040,-26937, %T A122167 8195,-100235,18754,-374436,25425,-1404206,-73577,-5286619,-913677, %U A122167 -19980584,-5843020,-75805291,-31102908,-288681717,-151721161,-1103377699,-703352678,-4232153760,-3154163983 %N A122167 Expansion of x*(-1+5*x-6*x^2+x^3) / ( (2*x-1)*(x^3-3*x^2+1) ). %H A122167 P. Steinbach, <a href="http://www.jstor.org/stable/2691048">Golden fields: a case for the heptagon</a>, Math. Mag. 70 (1997), no. 1, 22-31. %H A122167 <a href="/index/Rec#order_04">Index entries for linear recurrences with constant coefficients</a>, signature (2,3,-7,2). %t A122167 Rest[CoefficientList[Series[x (-1+5x-6x^2+x^3)/((2x-1)(x^3-3x^2+1)),{x,0,40}],x]] (* or *) LinearRecurrence[{2,3,-7,2},{1,-3,3,-11},40] (* _Harvey P. Dale_, Apr 28 2015 *) %o A122167 (PARI) Vec(x*(-1+5*x-6*x^2+x^3)/((2*x-1)*(x^3-3*x^2+1))+O(x^99)) \\ _Charles R Greathouse IV_, Sep 27 2012 %K A122167 sign,easy %O A122167 1,2 %A A122167 _Gary W. Adamson_ and _Roger L. Bagula_, Oct 17 2006