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 A048840 #24 Mar 07 2020 01:15:57 %S A048840 1,2,5,12,22,34,48,64,82,102,124,148,174,202,232,264,298,334,372,412, %T A048840 454,498,544,592,642,694,748,804,862,922,984,1048,1114,1182,1252,1324, %U A048840 1398,1474,1552,1632,1714,1798,1884,1972,2062,2154,2248,2344,2442,2542 %N A048840 Expansion of (1 - x + 2*x^2 + 2*x^3 - x^4 - x^5)/(1-x)^3. %C A048840 Also, number of permutations of length n+1 which avoid the patterns 321, 1342, 2134. - _Lara Pudwell_, Feb 26 2006 %H A048840 Colin Barker, <a href="/A048840/b048840.txt">Table of n, a(n) for n = 0..1000</a> %H A048840 Lara Pudwell, <a href="http://faculty.valpo.edu/lpudwell/maple/webbook/bookmain.html">Systematic Studies in Pattern Avoidance</a>, 2005. %H A048840 <a href="/index/Rec#order_03">Index entries for linear recurrences with constant coefficients</a>, signature (3,-3,1). %F A048840 For n > 2, a(n) = n^2 + 3n - 6. %F A048840 a(n) = 3*a(n-1) - 3*a(n-2) + a(n-3) for n > 5. - _Colin Barker_, May 03 2019 %t A048840 CoefficientList[Series[(1-x+2*x^2+2*x^3-x^4-x^5)/(1-x)^3,{x,0,60}],x] (* or *) Join[{1,2,5},Table[n^2+3*n-6,{n,3,60}]] (* or *) Join[{1,2,5},LinearRecurrence[{3,-3,1},{12,22,34},58]] (* _Vladimir Joseph Stephan Orlovsky_, Jan 31 2012 *) %o A048840 (PARI) Vec((1-x+2*x^2+2*x^3-x^4-x^5)/(1-x)^3 + O(x^99)) \\ _Charles R Greathouse IV_, Sep 27 2012, corrected by _Colin Barker_, May 03 2019 %K A048840 nonn,easy %O A048840 0,2 %A A048840 _N. J. A. Sloane_