A233669
a(n) = 7*binomial(5*n+7, n)/(5*n+7).
Original entry on oeis.org
1, 7, 56, 490, 4550, 44051, 439824, 4496388, 46834095, 495260150, 5303177880, 57385471962, 626548297648, 6893781417320, 76362138282400, 850867975145160, 9530515916642385, 107249427630005661, 1211964598880990640, 13747501038498835300
Offset: 0
- Vincenzo Librandi, Table of n, a(n) for n = 0..200
- J-C. Aval, Multivariate Fuss-Catalan Numbers, arXiv:0711.0906v1, Discrete Math., 308 (2008), 4660-4669.
- Thomas A. Dowling, Catalan Numbers Chapter 7
- Wojciech Mlotkowski, Fuss-Catalan Numbers in Noncommutative Probability, Docum. Mathm. 15: 939-955.
-
[7*Binomial(5*n+7,n)/(5*n+7): n in [0..30]];
-
Table[7 Binomial[5 n + 7, n]/(5 n + 7), {n, 0, 30}]
-
a(n) = 7*binomial(5*n+7,n)/(5*n+7);
-
{a(n)=local(B=1); for(i=0, n, B=(1+x*B^(5/7))^7+x*O(x^n)); polcoeff(B, n)}
A233736
a(n) = 8*binomial(5*n + 8, n)/(5*n + 8).
Original entry on oeis.org
1, 8, 68, 616, 5850, 57536, 581196, 5995184, 62891499, 668922800, 7197169980, 78195588168, 856708896784, 9454328800896, 104997940138300, 1172624772468960, 13161188646791865, 148375147999406328, 1679436658449372744, 19078164706488179600
Offset: 0
- Vincenzo Librandi, Table of n, a(n) for n = 0..200
- J-C. Aval, Multivariate Fuss-Catalan Numbers, arXiv:0711.0906v1, Discrete Math., 308 (2008), 4660-4669.
- Thomas A. Dowling, Catalan Numbers Chapter 7
- Wojciech Mlotkowski, Fuss-Catalan Numbers in Noncommutative Probability, Docum. Mathm. 15: 939-955.
-
[8*Binomial(5*n+8,n)/(5*n+8): n in [0..30]]; // Vincenzo Librandi, Dec 16 2013
-
Table[8 Binomial[5 n + 8, n]/(5 n + 8), {n, 0, 40}] (* Vincenzo Librandi, Dec 16 2013 *)
-
a(n) = 8*binomial(5*n+8,n)/(5*n+8);
-
{a(n)=local(B=1); for(i=0, n, B=(1+x*B^(5/8))^8+x*O(x^n)); polcoeff(B, n)}
A233737
a(n) = 9*binomial(5*n+9, n)/(5*n+9).
Original entry on oeis.org
1, 9, 81, 759, 7371, 73656, 752913, 7838298, 82832706, 886322710, 9583986555, 104568156819, 1149793519368, 12728471356944, 141747219186705, 1586867219265060, 17848735288114995, 201607141031660871, 2285899896222757346, 26008027474874327190, 296840444852078282610, 3397721117411729991960
Offset: 0
- Vincenzo Librandi, Table of n, a(n) for n = 0..200
- J-C. Aval, Multivariate Fuss-Catalan Numbers, arXiv:0711.0906v1, Discrete Math., 308 (2008), 4660-4669.
- Thomas A. Dowling, Catalan Numbers Chapter 7
- Wojciech Mlotkowski, Fuss-Catalan Numbers in Noncommutative Probability, Docum. Mathm. 15: 939-955.
-
[9*Binomial(5*n+9,n)/(5*n+9): n in [0..30]];
-
Table[9 Binomial[5 n + 9, n]/(5 n + 9), {n, 0, 30}]
-
a(n) = 9*binomial(5*n+9,n)/(5*n+9);
-
{a(n)=local(B=1); for(i=0, n, B=(1+x*B^(5/9))^9+x*O(x^n)); polcoeff(B, n)}
A143338
G.f. A(x) satisfies A(x) = 1 + x*A(x)^3*A(-x).
Original entry on oeis.org
1, 1, 2, 8, 26, 127, 478, 2536, 10250, 56900, 239880, 1370272, 5940054, 34607146, 153018932, 904441648, 4058644842, 24254529036, 110096276440, 663665021280, 3040205250984, 18455364854839, 85176971647470, 520059936017128
Offset: 0
G.f.: A(x) = 1 + x + 2*x^2 + 8*x^3 + 26*x^4 + 127*x^5 + 478*x^6 +...
Compare bisections of A(x)^2, A(x)^2*A(-x), and A(x)^4*A(-x)^2:
A(x)^2 = 1 + 2*x + 5*x^2 + 20*x^3 + 72*x^4 + 338*x^5 + 1378*x^6 + 6952*x^7 +...
A(x)^2*A(-x) = 1 + x + 5*x^2 + 11*x^3 + 72*x^4 + 191*x^5 + 1378*x^6 + 3979*x^7 +...
A(x)^4*A(-x)^2 = 1 + 2*x + 11*x^2 + 32*x^3 + 191*x^4 + 636*x^5 + 3979*x^6 +...
Related expansions:
A(x)^3 = 1 + 3*x + 9*x^2 + 37*x^3 + 144*x^4 + 669*x^5 + 2882*x^6 + 14229*x^7 +...
A(x)^3*A(-x) = 1 + 2*x + 8*x^2 + 26*x^3 + 127*x^4 + 478*x^5 + 2536*x^6 +...
A(x)^3*A(-x)^2 = 1 + x + 8*x^2 + 14*x^3 + 127*x^4 + 264*x^5 + 2536*x^6 +...
-
{a(n)=local(A=1+x+O(x^21));for(i=0,n,A=1+x*A^3*subst(A,x,-x));polcoeff(A,n)}
A192893
Number of symmetric 11-ary factorizations of the n-cycle (1,2...n).
Original entry on oeis.org
1, 1, 1, 6, 11, 81, 176, 1406, 3311, 27636, 68211, 585162, 1489488, 13019909, 33870540, 300138696, 793542167, 7105216833, 19022318084, 171717015470, 464333035881, 4219267597578, 11502251937176, 105085831400550, 288417894029200, 2647012241261856, 7306488667126803
Offset: 0
A369473
Number of chiral pairs of polyominoes composed of n hexagonal cells of the hyperbolic regular tiling with Schläfli symbol {6,oo}.
Original entry on oeis.org
7, 50, 448, 3810, 34200, 314655, 2982040, 28897440, 285577500, 2868769045, 29227672960, 301429078080, 3141983233130, 33059729519325, 350763428176480, 3749420512083472, 40348040467611800, 436827334389425980
Offset: 4
-
p=6; Table[(Binomial[(p-1)n, n]/(((p-2)n+1)((p-2)n+2))-If[OddQ[n], If[OddQ[p], Binomial[(p-1)n/2, (n-1)/2]/n, (p+1)Binomial[((p-1)n-1)/2, (n-1)/2]/((p-2)n+2)-Binomial[((p-1)n+1)/2, (n-1)/2]/((p-1)n+1)], Binomial[(p-1)n/2, n/2]/((p-2)n+2)]+DivisorSum[GCD[p, n-1], EulerPhi[#]Binomial[((p-1)n+1)/#, (n-1)/#]/((p-1)n+1)&, #>1&])/2, {n, 4, 30}]
A192894
Number of symmetric 13-ary factorizations of the n-cycle (1,2...n).
Original entry on oeis.org
1, 1, 1, 7, 13, 112, 247, 2310, 5525, 53998, 135408, 1360289, 3518515, 36017352, 95223414, 988172368, 2655417765, 27844071255, 75769712590, 801012669457, 2201663313200, 23428926096576, 64924369564353, 694644371065372, 1938034271677595, 20829931845958872, 58448142042957576
Offset: 0
A385687
E.g.f. A(x) satisfies A(x) = exp( x*((A(x) + A(-x))/2)^2 ).
Original entry on oeis.org
1, 1, 1, 7, 25, 341, 2161, 44115, 404209, 11010025, 132273601, 4508793983, 67085545033, 2747071330173, 48765277295281, 2331905267846731, 48106649137922017, 2631174441142423505, 61862217319644572161, 3809106344377237185399, 100542158725584301036921
Offset: 0
-
terms = 21; A[] = 1; Do[A[x] = Exp[x*((A[x] + A[-x])/2)^2] + O[x]^terms // Normal, terms]; CoefficientList[A[x], x]Range[0,terms-1]! (* Stefano Spezia, Jul 07 2025 *)
Comments