A365183
G.f. satisfies A(x) = 1 + x*A(x)^4*(1 + x*A(x)^4).
Original entry on oeis.org
1, 1, 5, 34, 268, 2299, 20838, 196326, 1903524, 18868861, 190356231, 1948055058, 20173907384, 211020478270, 2226243632838, 23660868061422, 253099278807684, 2722819049879436, 29439894433161189, 319749417998303470, 3486914150183526920
Offset: 0
-
a(n) = sum(k=0, n\2, binomial(n-k, k)*binomial(4*n+1, n-k))/(4*n+1);
A365184
G.f. satisfies A(x) = 1 + x*A(x)^5*(1 + x).
Original entry on oeis.org
1, 1, 6, 45, 395, 3775, 38146, 400826, 4335455, 47951065, 539823620, 6165377836, 71261299056, 831990025420, 9797505040130, 116235417614900, 1387958781395535, 16668362761081560, 201190667288072005, 2439418470063468505, 29698136499328762445
Offset: 0
-
a(n) = sum(k=0, n, binomial(k, n-k)*binomial(5*k, k)/(4*k+1));
A255673
Coefficients of A(x), which satisfies: A(x) = 1 + x*A(x)^3 + x^2*A(x)^6.
Original entry on oeis.org
1, 1, 4, 21, 127, 833, 5763, 41401, 305877, 2309385, 17739561, 138197876, 1089276972, 8670856834, 69606939717, 562879492551, 4580890678781, 37490975387565, 308369889858450, 2547741413147700, 21133987935358776, 175947462569886786, 1469656053534121804
Offset: 0
A(x) = 1 + x + 4*x^2 + 21*x^3 + 127*x^4 + 833*x^5 + 5763*x^6 ...
-
a:= n-> coeff(series(RootOf(1-A+x*A^3+x^2*A^6, A), x, n+1), x, n):
seq(a(n), n=0..30); # Alois P. Heinz, Jul 15 2015
# second Maple program:
a:= proc(n) option remember; `if`(n<2, 1, 9*(((3*n-1))*
(2*n-1)*(3*n-2)*(9063*n^4-18126*n^3+8403*n^2+660*n-280)*a(n-1)
+(27*(n-1))*(3*n-1)*(3*n-4)*(3*n-2)*(3*n-5)*(57*n^2-2)*a(n-2))
/((5*(5*n+2))*(5*n-1)*(5*n+1)*(5*n-2)*n*(57*n^2-114*n+55)))
end:
seq(a(n), n=0..30); # Alois P. Heinz, Jul 16 2015
-
m = 30; A[_] = 0;
Do[A[x_] = 1 + x A[x]^3 + x^2 A[x]^6 + O[x]^m, {m}];
CoefficientList[A[x], x] (* Jean-François Alcover, Oct 04 2019 *)
-
a(n) = sum(k=0, n\2, binomial(n-k, k)*binomial(3*n+1, n-k))/(3*n+1); \\ Seiichi Manyama, Sep 02 2023
A365186
G.f. satisfies A(x) = 1 + x*A(x)^5*(1 + x*A(x)^2).
Original entry on oeis.org
1, 1, 6, 47, 428, 4241, 44407, 483358, 5414618, 62014112, 722870120, 8547768832, 102284029963, 1236274747490, 15070955944288, 185089043535730, 2287843817573898, 28440852786725695, 355345599519983962, 4459821165693379625, 56200963128262312342
Offset: 0
-
a(n) = sum(k=0, n, binomial(2*n+3*k+1, k)*binomial(k, n-k)/(2*n+3*k+1));
A365185
G.f. satisfies A(x) = 1 + x*A(x)^5*(1 + x*A(x)).
Original entry on oeis.org
1, 1, 6, 46, 411, 3996, 41062, 438662, 4823133, 54221518, 620404859, 7201317005, 84590041441, 1003656037278, 12010861830069, 144804336388912, 1757106190680819, 21443109365898743, 263009775111233392, 3240530659303505547, 40088688455992604594
Offset: 0
-
a(n) = sum(k=0, n, binomial(n+4*k+1, k)*binomial(k, n-k)/(n+4*k+1));
A365187
G.f. satisfies A(x) = 1 + x*A(x)^5*(1 + x*A(x)^3).
Original entry on oeis.org
1, 1, 6, 48, 446, 4511, 48218, 535800, 6127598, 71648868, 852668952, 10293847592, 125759270354, 1551872951050, 19314892116764, 242182938963024, 3056337851481678, 38790948190319404, 494825459824571528, 6340628082364678016, 81577931200018721464
Offset: 0
-
a(n) = sum(k=0, n, binomial(3*n+2*k+1, k)*binomial(k, n-k)/(3*n+2*k+1));
A365188
G.f. satisfies A(x) = 1 + x*A(x)^5*(1 + x*A(x)^4).
Original entry on oeis.org
1, 1, 6, 49, 465, 4807, 52533, 596936, 6981798, 83497115, 1016367737, 12550853210, 156845913315, 1979870172453, 25207383853375, 323325558146400, 4174108907656633, 54195445136831670, 707225283913589280, 9270735916525207605, 122020617365557674605
Offset: 0
-
a(n) = sum(k=0, n, binomial(4*n+k+1, k)*binomial(k, n-k)/(4*n+k+1));
A376328
G.f. satisfies A(x) = (1 + x*A(x)*(1 + x*A(x)))^5.
Original entry on oeis.org
1, 5, 40, 380, 3970, 44051, 509575, 6077435, 74194780, 922644310, 11646083631, 148827827450, 1921724362880, 25034267112600, 328614891689845, 4342322118727300, 57715241768897445, 771087466276360970, 10349495416322497575, 139486475071720234920, 1886980259513934080860, 25613816043115261657425
Offset: 0
-
a(n, s=1, t=5) = sum(k=0, n, binomial(t*(n+1), k)*binomial(s*k, n-k))/(n+1);
-
my(N=30, x='x+O('x^N)); Vec(serreverse(x/(1+x+x^2)^5)/x)
Showing 1-8 of 8 results.
Comments