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 A169794 #37 Sep 08 2022 08:45:49 %S A169794 1,7,35,147,553,1925,6321,19825,59906,175504,500864,1397536,3823680, %T A169794 10282496,27230464,71129856,183518720,468213760,1182433280,2958376960, %U A169794 7338426368,18059821056,44120473600,107055742976,258122317824,618683957248,1474700509184 %N A169794 Expansion of ((1-x)/(1-2*x))^7. %C A169794 a(n) is the number of weak compositions of n with exactly 6 parts equal to 0. - _Milan Janjic_, Jun 27 2010 %H A169794 Vincenzo Librandi, <a href="/A169794/b169794.txt">Table of n, a(n) for n = 0..1000</a> %H A169794 Nickolas Hein, Jia Huang, <a href="https://arxiv.org/abs/1807.04623">Variations of the Catalan numbers from some nonassociative binary operations</a>, arXiv:1807.04623 [math.CO], 2018. %H A169794 M. Janjic and B. Petkovic, <a href="http://arxiv.org/abs/1301.4550">A Counting Function</a>, arXiv 1301.4550 [math.CO], 2013. %H A169794 M. Janjic, B. Petkovic, <a href="https://cs.uwaterloo.ca/journals/JIS/VOL17/Janjic/janjic45.html">A Counting Function Generalizing Binomial Coefficients and Some Other Classes of Integers</a>, J. Int. Seq. 17 (2014) # 14.3.5. %H A169794 <a href="/index/Rec#order_07">Index entries for linear recurrences with constant coefficients</a>, signature (14, -84, 280, -560, 672, -448, 128). %F A169794 G.f.: ((1-x)/(1-2*x))^7. %F A169794 For n > 0, a(n) = 2^(n-11)*(n+3)*(n+6)*(n^4 + 54*n^3 + 931*n^2 + 5454*n + 5080)/45. - _Bruno Berselli_, Aug 07 2011 %p A169794 seq(coeff(series(((1-x)/(1-2*x))^7,x,n+1), x, n), n = 0 .. 30); # _Muniru A Asiru_, Oct 16 2018 %t A169794 CoefficientList[Series[((1 - x)/(1 - 2 x))^7, {x, 0, 26}], x] (* _Michael De Vlieger_, Oct 15 2018 *) %o A169794 (PARI) x='x+O('x^30); Vec(((1-x)/(1-2*x))^7) \\ _G. C. Greubel_, Oct 16 2018 %o A169794 (Magma) m:=30; R<x>:=PowerSeriesRing(Integers(), m); Coefficients(R!(((1-x)/(1-2*x))^7)); // _G. C. Greubel_, Oct 16 2018 %Y A169794 Cf. for ((1-x)/(1-2x))^k: A011782, A045623, A058396, A062109, A169792-A169797; a row of A160232. %K A169794 nonn,easy %O A169794 0,2 %A A169794 _N. J. A. Sloane_, May 15 2010