A173155 -id:A173155 - cp's OEIS frontend

A053107 Expansion of 1/(1-8*x)^8.

1, 64, 2304, 61440, 1351680, 25952256, 449839104, 7197425664, 107961384960, 1535450808320, 20882130993152, 273366078455808, 3462636993773568, 42617070692597760, 511404848311173120, 6000483553517764608, 69005560865454292992, 779356922715719073792

Offset: 0

Wolfdieter Lang

With a different offset, number of n-permutations (n>=7) of 9 objects: p, r, s, t, u, v, z, x, y with repetition allowed, containing exactly 7 u's. - Zerinvary Lajos, Feb 11 2010

Vincenzo Librandi, Table of n, a(n) for n = 0..400
Index entries for linear recurrences with constant coefficients, signature (64, -1792, 28672, -286720, 1835008, -7340032, 16777216, -16777216).

Cf. A036226.

Cf. A081138, A140802, A175210, A140406, A053107, A141054, A173155. - Zerinvary Lajos, Feb 11 2010

[8^n* Binomial(n+7, 7): n in [0..20]]; // Vincenzo Librandi, Oct 16 2011

Table[Binomial[n + 7, 7]*8^n, {n, 0, 20}] (* Zerinvary Lajos, Feb 11 2010 *)
CoefficientList[Series[1/(1-8x)^8,{x,0,20}],x] (* or *) LinearRecurrence[ {64,-1792,28672,-286720,1835008,-7340032,16777216,-16777216},{1,64,2304,61440,1351680,25952256,449839104,7197425664},20] (* Harvey P. Dale, Jul 19 2018 *)

vector(30, n, n--; 8^n*binomial(n+7,7)) \\ G. C. Greubel, Aug 16 2018

[lucas_number2(n, 8, 0)*binomial(n,7)/8^7 for n in range(7, 22)] # Zerinvary Lajos, Mar 13 2009

a(n) = 8^n*binomial(n+7, 7).

G.f.: 1/(1-8*x)^8.

More terms from Harvey P. Dale, Jul 19 2018

A196280 a(n) = binomial(n+9, 9)*8^n.

Original entry on oeis.org

1, 80, 3520, 112640, 2928640, 65601536, 1312030720, 23991418880, 407854120960, 6525665935360, 99190122217472, 1442765414072320, 20198715797012480, 273459536944168960, 3594039628409077760, 46003707243636195328, 575046340545452441600, 7035861107850241638400

Offset: 0

Vincenzo Librandi, Oct 13 2011

Vincenzo Librandi, Table of n, a(n) for n = 0..400
Index entries for linear recurrences with constant coefficients, signature (80,-2880,61440,-860160,8257536,-55050240,251658240,-754974720,1342177280,-1073741824).

Cf. A140406, A140802, A141054, A173155

Magma
```
[Binomial(n+9, 9)*8^n: n in [0..20]];
```

Table[Binomial[n+9,9]8^n,{n,0,20}] (* or *) LinearRecurrence[{80,-2880,61440,-860160,8257536,-55050240,251658240,-754974720,1342177280,-1073741824},{1,80,3520,112640,2928640,65601536,1312030720,23991418880,407854120960,6525665935360},20] (* Harvey P. Dale, May 13 2017 *)

a(n) = C(n+9,9)*8^n.
G.f.: 1 / (8*x-1)^10 . - R. J. Mathar, Oct 13 2011
From Amiram Eldar, Feb 17 2023: (Start)
Sum_{n>=0} 1/a(n) = 415065672*log(8/7) - 277121481/5.
Sum_{n>=0} (-1)^n/a(n) = 3099363912*log(9/8) - 12776837121/35. (End)

A197321 a(n) = binomial(n+10, 10)*8^n.

Original entry on oeis.org

1, 88, 4224, 146432, 4100096, 98402304, 2099249152, 40785412096, 734137417728, 12398765277184, 198380244434944, 3029807369551872, 44437174753427456, 628956934971588608, 8625695108181786624, 115009268109090488320, 1495120485418176348160, 18996824991195652423680

Offset: 0

Vincenzo Librandi, Oct 15 2011

Vincenzo Librandi, Table of n, a(n) for n = 0..400
Index entries for linear recurrences with constant coefficients, signature (88,-3520,84480,-1351680,15138816,-121110528,692060160,-2768240640,7381975040,-11811160064,8589934592).

Cf. A140406, A140802, A141054, A173155, A196280.

Magma
```
[8^n*Binomial(n+10, 10): n in [0..20]]
```

Table[Binomial[n+10,10]8^n,{n,0,20}] (* Harvey P. Dale, Mar 05 2012 *)

a(n) = 8^n*C(n+10, 10).
G.f.: 1/(1-8*x)^11.
From Amiram Eldar, Feb 17 2023: (Start)
Sum_{n>=0} 1/a(n) = 3879700814/9 - 3228288560*log(8/7).
Sum_{n>=0} (-1)^n/a(n) = 30993639120*log(9/8) - 229983068738/63. (End)

A362353 Triangle read by rows: T(n,k) = (-1)^(n-k)binomial(n, k)(k+3)^n, for n >= 0, and k = 0,1, ..., n. Coefficients of certain Sidi polynomials.

Original entry on oeis.org

1, -3, 4, 9, -32, 25, -27, 192, -375, 216, 81, -1024, 3750, -5184, 2401, -243, 5120, -31250, 77760, -84035, 32768, 729, -24576, 234375, -933120, 1764735, -1572864, 531441, -2187, 114688, -1640625, 9797760, -28824005, 44040192, -33480783, 10000000, 6561, -524288, 10937500, -94058496, 403536070, -939524096, 1205308188, -800000000, 214358881

Offset: 0

Harlan J. Brothers and Wolfdieter Lang, Apr 27 2023

This is the member N = 2 of a family of signed triangles with row sums n! = A000142(n): T(N; n, k) = (-1)^(n-k)*binomial(n, k)*(k + N + 1)^n, for integer N, n >= 0 and k = 0, 1, ..., n. The row polynomials PS(N; n, z) = Sum_{k=0..n} T(N; n, k)*z^k = ((-1)^n/z^N)*D_{n,N+1,n}(z) in [Sidi 1980].
For N = -1, 0 and 1 see A258773(n, k), A075513(n+1, k) and (-1)^(n-k) * A154715(n, k), respectively.
The column sequences, for k = 0, 1, ..., 6 and n >= k, are A141413(n+2), (-1)^(n+1)*A018215(n) = 4*(-1)^(n+1)*A002697(n), 5^2*(-1)^n*A081135(n), (-1)^(n+1)*A128964(n-1) = 6^3*(-1)^(n+1)*A081144(n), 7^4*(-1)^n*A139641(n-4), 2^15*(-1)^(n+1)*A173155(n-5), 3^12*(-1)^n*A173191(n-6), respectively.
The e.g.f. of the triangle (see below) needs the exponential convolution (LambertW(-z)/(-z))^2 = Sum_{n>=0} c(2; n)*z^n/n!, where c(2; n) = Sum_{m=0..n} |A137352(n+1, m)|*2^m = A007334(n+2).
The row sums give n! = A000142(n).

			The triangle T begins:
n\k    0       1        2         3         4          5          6         7
0:     1
1:    -3       4
2:     9     -32       25
3:   -27     192     -375       216
4:    81   -1024     3750     -5184      2401
5:  -243    5120   -31250     77760    -84035      32768
6:   729  -24576   234375   -933120   1764735   -1572864     531441
7: -2187  114688 -1640625   9797760 -28824005   44040192  -33480783  10000000
...
n = 8:  6561 -524288 10937500 -94058496 403536070 -939524096 1205308188 -800000000 2143588,
n = 9: -19683 2359296 -70312500 846526464 -5084554482 16911433728 -32543321076 36000000000 -21221529219 5159780352.

Paolo Xausa, Table of n, a(n) for n = 0..5049 (rows 0..100 of the triangle, flattened)
Wolfdieter Lang, On a Certain Family of Sidi Polynomials, May 2023.
Avram Sidi, Numerical Quadrature and Nonlinear Sequence Transformations; Unified Rules for Efficient Computation of Integrals with Algebraic and Logarithmic Endpoint Singularities, Math. Comp., 35 (1980), 851-874.

Cf. A000142 (row sums), A075513, A154715, A258773.

Columns k = 0..6 involve (see above): A002697, A007334, A018215, A081135, A081144, A128964, A137352, A139641, A141413, A173155, A173191.

A362353row[n_]:=Table[(-1)^(n-k)Binomial[n,k](k+3)^n,{k,0,n}];Array[A362353row,10,0] (* Paolo Xausa, Jul 30 2023 *)

T(n, k) = (-1)^(n-k)*binomial(n, k)*(k + 3)^n, for n >= 0, k = 0, 1, ..., n.
O.g.f. of column k: (x*(k + 3))^k/(1 - (k + 3)*x)^(k+1), for k >= 0.
E.g.f. of column k: exp(-(k + 3)*x)*((k + 3)*x)^k/k!, for k >= 0.
E.g.f. of the triangle, that is, the e.g.f. of its row polynomials {PS(2;n,y)}_{n>=0}): ES(2;y,x) = exp(-3*x)*(1/3)*(d/dz)(W(-z)/(-z))^2, after replacing z by x*y*exp(-x), where W is the Lambert W-function for the principal branch. This becomes ES(2;y,x) = exp(-3*x)*exp(3*(-W(-z)))/(1 - (-W(-z)), with z = x*y*exp(-x).

a(41)-a(44) from Paolo Xausa, Jul 31 2023

cp's OEIS Frontend

A053107 Expansion of 1/(1-8*x)^8.

Views

Author

Keywords

Comments

Links

Crossrefs

Programs

Magma

Mathematica

PARI

Sage

Formula

Extensions

A196280 a(n) = binomial(n+9, 9)*8^n.

Views

Author

Keywords

Links

Crossrefs

Programs

Magma

Mathematica

Formula

A197321 a(n) = binomial(n+10, 10)*8^n.

Views

Author

Keywords

Links

Crossrefs

Programs

Magma

Mathematica

Formula

A362353 Triangle read by rows: T(n,k) = (-1)^(n-k)*binomial(n, k)*(k+3)^n, for n >= 0, and k = 0,1, ..., n. Coefficients of certain Sidi polynomials.

Views

Author

Keywords

Comments

Examples

Links

Crossrefs

Programs

Mathematica

Formula

Extensions

A362353 Triangle read by rows: T(n,k) = (-1)^(n-k)binomial(n, k)(k+3)^n, for n >= 0, and k = 0,1, ..., n. Coefficients of certain Sidi polynomials.