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 A192816 #25 Feb 05 2025 22:03:33 %S A192816 0,1,2,7,36,173,806,3763,17608,82393,385482,1803487,8437740,39476613, %T A192816 184694254,864105611,4042781584,18914450865,88492648850,414019362743, %U A192816 1937020023220,9062490569821,42399528318646,198369310046307,928085399264344 %N A192816 a(n) = A192815(n)/2. %H A192816 G. C. Greubel, <a href="/A192816/b192816.txt">Table of n, a(n) for n = 0..1000</a> (terms 0..100 from Vincenzo Librandi) %H A192816 <a href="/index/Rec#order_03">Index entries for linear recurrences with constant coefficients</a>, signature (5,-3,7). %F A192816 a(n) = 5*a(n-1) - 3*a(n-2) + 7*a(n-3). %F A192816 G.f.: x*(1-3*x)/(1-5*x+3*x^2-7*x^3). - _Bruno Berselli_, Jul 11 2011 %t A192816 (* See A192814. *) %t A192816 LinearRecurrence[{5,-3,7}, {0,1,2}, 30] (* _G. C. Greubel_, Jan 03 2019 *) %o A192816 (PARI) my(x='x+O('x^30)); concat([0], Vec(x*(1-3*x)/(1-5*x+3*x^2-7*x^3))) \\ _G. C. Greubel_, Jan 03 2019 %o A192816 (Magma) m:=30; R<x>:=PowerSeriesRing(Integers(), m); [0] cat Coefficients(R!( x*(1-3*x)/(1-5*x+3*x^2-7*x^3) )); // _G. C. Greubel_, Jan 03 2019 %o A192816 (Sage) (x*(1-3*x)/(1-5*x+3*x^2-7*x^3)).series(x, 30).coefficients(x, sparse=False) # _G. C. Greubel_, Jan 03 2019 %Y A192816 Cf. A192242, A192744, A192814, A192815. %K A192816 nonn,easy %O A192816 0,3 %A A192816 _Clark Kimberling_, Jul 10 2011