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 A168150 #27 Sep 08 2022 08:45:48 %S A168150 0,1,-1,3,-8,20,-48,112,-256,576,-1280,2816,-6144,13312,-28672,61440, %T A168150 -131072,278528,-589824,1245184,-2621440,5505024,-11534336,24117248, %U A168150 -50331648,104857600,-218103808,452984832,-939524096,1946157056,-4026531840,8321499136,-17179869184 %N A168150 Inverse binomial transform of A026741. %H A168150 G. C. Greubel, <a href="/A168150/b168150.txt">Table of n, a(n) for n = 0..1000</a> %H A168150 <a href="/index/Rec#order_02">Index entries for linear recurrences with constant coefficients</a>, signature (-4,-4). %F A168150 a(n+2) = (-1)^(n+1) * A001792(n). %F A168150 From _R. J. Mathar_, Nov 23 2009: (Start) %F A168150 a(n) = -4*a(n-1) -4*a(n-2) = (-2)^(n-3)*n, n>3. %F A168150 G.f.: x*(1 + 3*x + 3*x^2)/(1 + 2*x)^2. (End) %t A168150 Join[{0, 1, -1, 3}, LinearRecurrence[{-4, -4}, {-8, 20}, 50]] (* _G. C. Greubel_, Jul 14 2016 *) %t A168150 CoefficientList[Series[x (1 + 3 x + 3 x^2) / (1 + 2 x)^2, {x, 0, 33}], x] (* _Vincenzo Librandi_, Jul 15 2016 *) %o A168150 (PARI) a(n)=(-2)^if(n>1,n-3)*n \\ _M. F. Hasler_, Jan 25 2012 %o A168150 (Magma) [0,1] cat [(-2)^(n-3)*n: n in [2..35]]; // _Vincenzo Librandi_, Jul 15 2016 %Y A168150 Cf. A001792, A026741, A108189. %K A168150 sign,easy %O A168150 0,4 %A A168150 _Paul Curtz_, Nov 19 2009 %E A168150 Comments turned into formulas, out-of-scope material moved to A026741 by _R. J. Mathar_, Nov 23 2009