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 A141354 #18 Sep 08 2022 08:45:35 %S A141354 1,-3,-7,-15,-23,-35,-47,-63,-79,-99,-119,-143,-167,-195,-223,-255, %T A141354 -287,-323,-359,-399,-439,-483,-527,-575,-623,-675,-727,-783,-839, %U A141354 -899,-959,-1023,-1087,-1155,-1223,-1295,-1367,-1443,-1519,-1599,-1679,-1763,-1847 %N A141354 Expansion of (1-5*x-x^2+x^3)/((1+x)*(1-x)^3). %C A141354 Hankel transform of A141353. %C A141354 Minus A181106 (largest odd number strictly less than a square). [Jerzy Kocik (jkocik(AT)siu.edu), Oct 06 2010] %H A141354 <a href="/index/Rec#order_04">Index entries for linear recurrences with constant coefficients</a>, signature (2,0,-2,1). %F A141354 G.f.: (1-5*x-x^2+x^3)/(1-2*x+2*x^3-x^4). %F A141354 a(n) = -A181106(n+1). %F A141354 From _Wesley Ivan Hurt_, Sep 08 2015: (Start) %F A141354 a(n) = 2*a(n-1)-2*a(n-3)+a(n-4), n>3. %F A141354 a(n) = ((-1)^n-2*n^2-4*n+1)/2. (End) %p A141354 A141354:=n->((-1)^n-2*n^2-4*n+1)/2: seq(A141354(n), n=0..100); # _Wesley Ivan Hurt_, Sep 08 2015 %t A141354 CoefficientList[Series[(1-5x-x^2+x^3)/((1+x)(1-x)^3),{x,0,42}],x] (* _Ray Chandler_, Dec 05 2011 *) %t A141354 LinearRecurrence[{2, 0, -2, 1}, {1, -3, -7, -15}, 60] (* _Vincenzo Librandi_, Sep 10 2015 *) %o A141354 (Magma) [((-1)^n-2*n^2-4*n+1)/2 : n in [0..100]]; // _Wesley Ivan Hurt_, Sep 08 2015 %o A141354 (Magma) I:=[1,-3,-7,-15]; [n le 4 select I[n] else 2*Self(n-1)-2*Self(n-3)+Self(n-4): n in [1..50]]; // _Vincenzo Librandi_, Sep 10 2015 %Y A141354 Cf. A141353, A181106. %K A141354 easy,sign %O A141354 0,2 %A A141354 _Paul Barry_, Jun 27 2008 %E A141354 Edited by _Ray Chandler_, Dec 05 2011