A051186 -id:A051186 - cp's OEIS frontend

A045754 7-fold factorials: a(n) = Product_{k=0..n-1} (7*k+1).

1, 1, 8, 120, 2640, 76560, 2756160, 118514880, 5925744000, 337767408000, 21617114112000, 1534815101952000, 119715577952256000, 10175824125941760000, 936175819586641920000, 92681406139077550080000, 9824229050742220308480000, 1110137882733870894858240000

Offset: 0

Wolfdieter Lang

nonn

G. C. Greubel, Table of n, a(n) for n = 0..338
Index entries for sequences related to factorial numbers.

Cf. k-fold factorials: A000142, A001147 (and A000165, A006882), A007559 (and A032031, A008544, A007661), A007696 (and A001813, A008545, A047053, A007662), A008548 (and A052562, A047055, A085157), A008542 (and A085158), A045755.
See also A113134.
Unsigned row sums of triangle A051186 (scaled Stirling1).
First column of triangle A132056 (S2(8)).
Cf. A114799, A084947, A144739, A144827, A147585, A049209, A051188.

List([0..20], n-> Product([0..n-1], k-> 7*k+1) ); # G. C. Greubel, Aug 21 2019

[1] cat [&*[7*j+1: j in [0..n-1]]: n in [1..20]]; // G. C. Greubel, Aug 21 2019

f := n->product( (7*k+1), k=0..(n-1));
G(x):=(1-7*x)^(-1/7): f[0]:=G(x): for n from 1 to 29 do f[n]:=diff(f[n-1],x) od: x:=0: seq(f[n],n=0..14); # Zerinvary Lajos, Apr 03 2009

FoldList[Times, 1, 7Range[0, 20] + 1] (* Harvey P. Dale, Jan 21 2013 *)

PARI
```
a(n)=prod(k=0,n-1,7*k+1)
```

[7^n*rising_factorial(1/7, n) for n in (0..20)] # G. C. Greubel, Aug 21 2019

a(n) = Sum_{k=0..n} (-7)^(n-k)*A048994(n, k), where A048994 = Stirling-1 numbers.
E.g.f.: (1-7*x)^(-1/7).
G.f.: 1/(1-x/(1-7*x/(1-8*x/(1-14*x/(1-15*x/(1-21*x/(1-22*x/(1-... (continued fraction). - Philippe Deléham, Jan 08 2012
a(n) = (-6)^n*Sum_{k=0..n} (7/6)^k*s(n+1,n+1-k), where s(n,k) are the Stirling numbers of the first kind, A048994. - Mircea Merca, May 03 2012
G.f.: 1/G(0), where G(k)= 1 - x*(7*k+1)/(1 - x*(7*k+7)/G(k+1)); (continued fraction). - Sergei N. Gladkovskii, Jun 05 2013
G.f.: G(0)/2, where G(k)= 1 + 1/(1 - x*(7*k+1)/(x*(7*k+1) + 1/G(k+1))); (continued fraction). - Sergei N. Gladkovskii, Jun 05 2013
a(n) = 7^n * Gamma(n + 1/7) / Gamma(1/7). - Artur Jasinski, Aug 23 2016
a(n) = A114799(7n-6). - M. F. Hasler, Feb 23 2018
D-finite with recurrence: a(n) +(-7*n+6)*a(n-1)=0. - R. J. Mathar, Jan 17 2020
Sum_{n>=0} 1/a(n) = 1 + (e/7^6)^(1/7)*(Gamma(1/7) - Gamma(1/7, 1/7)). - Amiram Eldar, Dec 19 2022

Additional comments from Philippe Deléham and Paul D. Hanna, Oct 29 2005
Edited by N. J. A. Sloane, Oct 16 2008 at the suggestion of M. F. Hasler, Oct 14 2008
Corrected by Zerinvary Lajos, Apr 03 2009

A132056 Triangle read by rows, the Bell transform of Product_{k=0..n} 7*k+1 without column 0.

Original entry on oeis.org

1, 8, 1, 120, 24, 1, 2640, 672, 48, 1, 76560, 22800, 2160, 80, 1, 2756160, 920160, 104880, 5280, 120, 1, 118514880, 43243200, 5639760, 347760, 10920, 168, 1, 5925744000, 2323918080, 336510720, 24071040, 937440, 20160, 224, 1

Offset: 1

Wolfdieter Lang Sep 14 2007

Previous name was: Triangle of numbers related to triangle A132057; generalization of Stirling numbers of second kind A008277, Lah-numbers A008297, ...
a(n,m) enumerates unordered n-vertex m-forests composed of m plane increasing 8-ary trees. See the F. Bergeron et al. reference, especially Table 1, first row, for the e.g.f. for m=1.
a(n,m) := S2(8; n,m) is the eighth triangle of numbers in the sequence S2(k;n,m), k=1..7: A008277 (unsigned Stirling 2nd kind), A008297 (unsigned Lah), A035342, A035469, A049029, A049385, A092082, respectively. a(n,1)=A045754(n), n>=1.

			{1}; {8,1}; {120,24,1}; {2640,672,48,1}; ...

F. Bergeron, Ph. Flajolet and B. Salvy, Varieties of Increasing Trees, Lecture Notes in Computer Science vol. 581, ed. J.-C. Raoult, Springer 1992, pp. 24-48.
P. Blasiak, K. A. Penson and A. I. Solomon, The general boson normal ordering problem, Phys. Lett. A 309 (2003) 198-205.
P. Blasiak, K. A. Penson and A. I. Solomon, The general boson normal ordering problem, arXiv:quant-ph/0402027, 2004.
W. Lang, On generalizations of Stirling number triangles, J. Integer Seqs., Vol. 3 (2000), #00.2.4.
M. Janjic, Some classes of numbers and derivatives, JIS 12 (2009) 09.8.3
W. Lang, First 10 rows.

Cf. A132060 (row sums), A132061 (alternating row sums).

Cf. A092082 S2(7) triangle.

# The function BellMatrix is defined in A264428.
# Adds (1,0,0,0, ..) as column 0.
BellMatrix(n -> mul(7*k+1, k=0..n), 8); # Peter Luschny, Jan 27 2016

a[n_, m_] := a[n, m] = ((m*a[n-1, m-1]*(m-1)! + (m+7*n-7)*a[n-1, m]*m!)*n!)/(n*m!*(n-1)!);
a[n_, m_] /; n < m = 0; a[_, 0] = 0; a[1, 1] = 1;
Flatten[Table[a[n, m], {n, 1, 8}, {m, 1, n}]][[1 ;; 36]]
(* Jean-François Alcover, Jun 17 2011 *)
rows = 8;
a[n_, m_] := BellY[n, m, Table[Product[7k+1, {k, 0, j}], {j, 0, rows}]];
Table[a[n, m], {n, 1, rows}, {m, 1, n}] // Flatten (* Jean-François Alcover, Jun 22 2018 *)

a(n, m) = n!*A132057(n, m)/(m!*7^(n-m)); a(n+1, m) = (7*n+m)*a(n, m)+ a(n, m-1), n >= m >= 1; a(n, m) := 0, n

E.g.f. of m-th column: ((-1+(1-7*x)^(-1/7))^m)/m!.

a(n, m) = sum(|A051186(n, j)|*S2(j, m), j=m..n) (matrix product), with S2(j, m):= (j, m) (Stirling2 triangle). Priv. comm. with W. Lang by E. Neuwirth, Feb 15 2001; see also the 2001 Neuwirth reference. See the general comment on products of Jabotinsky matrices given under A035342.

New name from Peter Luschny, Jan 27 2016

A049209 a(n) = -Product_{k=0..n} (7*k-1); sept-factorial numbers.

Original entry on oeis.org

1, 6, 78, 1560, 42120, 1432080, 58715280, 2818333440, 155008339200, 9610517030400, 663125675097600, 50397551307417600, 4182996758515660800, 376469708266409472000, 36517561701841718784000, 3797826416991538753536000, 421558732286060801642496000

Offset: 0

Wolfdieter Lang

G. C. Greubel, Table of n, a(n) for n = 0..330
Index entries for sequences related to factorial numbers.

Cf. A034833, A045754, A048994, A051188, A084947, A144739, A144827, A147585.
Row sums of triangle A051186 (scaled Stirling1 triangle).
Sequences of the form m^n*Pochhammer((m-1)/m, n): A000007 (m=1), A001147 (m=2), A008544 (m=3), A008545 (m=4), A008546 (m=5), A008543 (m=6), this sequence (m=7), A049210 (m=8), A049211 (m=9), A049212 (m=10), A254322 (m=11), A346896 (m=12).

[ -&*[ (7*k-1): k in [0..n-1] ]: n in [1..15] ]; // Klaus Brockhaus, Nov 10 2008

CoefficientList[Series[(1-7*x)^(-6/7),{x,0,20}],x] * Range[0,20]! (* Vaclav Kotesovec, Jan 28 2015 *)
With[{m=7}, Table[m^n*Pochhammer[(m-1)/m, n], {n, 0, 30}]] (* G. C. Greubel, Feb 16 2022 *)

m=7; [m^n*rising_factorial((m-1)/m, n) for n in (0..30)] # G. C. Greubel, Feb 16 2022

a(n) = 6*A034833(n) = (7*n-1)*(!^7), n >= 1, a(0) := 1.
a(n) = Product_{k=1..n} (7*k - 1). a(0) = 1; a(n) = (7*n - 1)*a(n-1) for n > 0. - Klaus Brockhaus, Nov 10 2008
G.f.: 1/(1-6*x/(1-7*x/(1-13*x/(1-14*x/(1-20*x/(1-21*x/(1-27*x/(1-28*x/(1-...(continued fraction). - Philippe Deléham, Jan 08 2012
a(n) = (-1)^n*Sum_{k=0..n} 7^k*s(n+1,n+1-k), where s(n,k) are the Stirling numbers of the first kind, A048994. - Mircea Merca, May 03 2012
a(n) = 7^n * Gamma(n+6/7) / Gamma(6/7). - Vaclav Kotesovec, Jan 28 2015
E.g.f.: (1-7*x)^(-6/7). - Vaclav Kotesovec, Jan 28 2015
From Nikolaos Pantelidis, Dec 19 2020: (Start)
G.f.: 1/G(0) where G(k) = 1 - (14*k+6)*x - 7*(k+1)*(7*k+6)*x^2/G(k+1); (continued fraction).
which starts as 1/(1-6*x-42*x^2/(1-20*x-182*x^2/(1-34*x-420*x^2/(1-48*x-756*x^2/(1-62*x-1190*x^2/(1-... )))))) (Jacobi continued fraction).
G.f.: 1/Q(0) where Q(k) = 1 - (7*k+6)*x/(1 - (7*k+7)*x/Q(k+1) ); (continued fraction). (End)
Sum_{n>=0} 1/a(n) = 1 + (e/7)^(1/7)*(Gamma(6/7) - Gamma(6/7, 1/7)). - Amiram Eldar, Dec 19 2022

A051188 Sept-factorial numbers.

Original entry on oeis.org

1, 7, 98, 2058, 57624, 2016840, 84707280, 4150656720, 232436776320, 14643516908160, 1025046183571200, 78928556134982400, 6629998715338521600, 603329883095805465600, 59126328543388935628800

Offset: 0

Wolfdieter Lang

For n >= 1, a(n) is the order of the wreath product of the symmetric group S_n and the Abelian group (C_7)^n. - Ahmed Fares (ahmedfares(AT)my-deja.com), May 07 2001

Vincenzo Librandi, Table of n, a(n) for n = 0..300
INRIA Algorithms Project, Encyclopedia of Combinatorial Structures 614.
Index entries for sequences related to factorial numbers

Cf. A000142, A000165, A032031, A045754, A047053, A047058, A049209, A051186, A052562, A053106, A084947, A092516, A092750, A144827, A144739, A147585.

[7^n*Factorial(n): n in [0..20]]; // Vincenzo Librandi, Oct 05 2011

a(n) = n!*7^n; \\ Michel Marcus, Jun 08 2020

a(n) = n!*7^n =: (7*n)(!^7).
a(n) = 7*A034834(n) = Product_{k=1..n} 7*k, n >= 1.
E.g.f.: 1/(1 - 7*x).
G.f.: 1/(1 - 7*x/(1 - 7*x/(1 - 14*x/(1 - 14*x/(1 - 21*x/(1 - 21*x/(1 - 28*x/(1 - 28*x/(1 - ... (continued fraction). - Philippe Deléham, Jan 08 2012
From Amiram Eldar, Jun 25 2020: (Start)
Sum_{n>=0} 1/a(n) = e^(1/7) (A092516).
Sum_{n>=0} (-1)^n/a(n) = e^(-1/7) (A092750). (End)

A051187 Generalized Stirling number triangle of the first kind.

Original entry on oeis.org

1, -8, 1, 128, -24, 1, -3072, 704, -48, 1, 98304, -25600, 2240, -80, 1, -3932160, 1122304, -115200, 5440, -120, 1, 188743680, -57802752, 6651904, -376320, 11200, -168, 1, -10569646080, 3425697792, -430309376, 27725824, -1003520, 20608, -224, 1

Offset: 1

Wolfdieter Lang

T(n,m)= R_n^m(a=0, b=8) in the notation of the given 1962 reference.
T(n,m) is a Jabotinsky matrix, i.e. the monic row polynomials E(n,x) := Sum_{m=1..n} T(n,m)*x^m = Product_{j=0..n-1} (x - 8*j), n >= 1, and E(0,x) := 1 are exponential convolution polynomials (see A039692 for the definition and a Knuth reference).
From Petros Hadjicostas, Jun 07 2020: (Start)
For integers n, m >= 0 and complex numbers a, b (with b <> 0), the numbers R_n^m(a,b) were introduced by Mitrinovic (1961) and further examined by Mitrinovic and Mitrinovic (1962). Such numbers are related to the work of Nörlund (1924).
They are defined via Product_{r=0..n-1} (x - (a + b*r)) = Sum_{m=0..n} R_n^m(a,b)*x^m for n >= 0. As a result, R_n^m(a,b) = R_{n-1}^{m-1}(a,b) - (a + b*(n-1))*R_{n-1}^m(a,b) for n >= m >= 1 with R_1^0(a,b) = a, R_1^1(a,b) = 1, R_n^m(a,b) = 0 for n < m, and R_0^0(a,b) = 1.
With a = 0 and b = 1, we get the Stirling numbers of the first kind S1(n,m) = R_n^m(a=0, b=1) = A048994(n,m).
We have R_n^m(a,b) = Sum_{k=0}^{n-m} (-1)^k * a^k * b^(n-m-k) * binomial(m+k, k) * S1(n, m+k) for n >= m >= 0.
For the current array, T(n,m) = R_n^m(a=0, b=8) but with no zero row or column. (End)

			Triangle T(n,m) (with rows n >= 1 and columns m = 1..n) begins:
          1;
         -8,         1;
        128,       -24,       1;
      -3072,       704,     -48,       1;
      98304,    -25600,    2240,     -80,     1;
   -3932160,   1122304, -115200,    5440,  -120,    1;
  188743680, -57802752, 6651904, -376320, 11200, -168, 1;
  ...
3rd row o.g.f.: E(3,x) = Product_{j=0..2} (x - 8*j) = 128*x - 24*x^2 + x^3.

D. S. Mitrinovic, Sur une classe de nombres reliés aux nombres de Stirling, Comptes rendus de l'Académie des sciences de Paris, t. 252 (1961), 2354-2356.
D. S. Mitrinovic and R. S. Mitrinovic, Sur les polynômes de Stirling, Bulletin de la Société des mathématiciens et physiciens de la R. P. de Serbie, t. 10 (1958), 43-49.
D. S. Mitrinovic and R. S. Mitrinovic, Sur les nombres de Stirling et les nombres de Bernoulli d'ordre supérieur, Univ. Beograd. Publ. Elektrotehn. Fak. Ser. Mat. Fiz., No. 43 (1960), 1-63.
D. S. Mitrinovic and R. S. Mitrinovic, Sur une classe de nombres se rattachant aux nombres de Stirling--Appendice: Table des nombres de Stirling, Univ. Beograd. Publ. Elektrotehn. Fak. Ser. Mat. Fiz., No. 60 (1961), 1-15 and 17-62.
D. S. Mitrinovic and R. S. Mitrinovic, Tableaux d'une classe de nombres reliés aux nombres de Stirling, Univ. Beograd. Publ. Elektrotehn. Fak. Ser. Mat. Fiz., No. 77 (1962), 1-77.
D. S. Mitrinovic and R. S. Mitrinovic, Tableaux d'une classe de nombres reliés aux nombres de Stirling, Univ. Beograd. Publ. Elektrotehn. Fak. Ser. Mat. Fiz., No. 77 (1962), 1-77 [jstor stable version].
Niels Nörlund, Vorlesungen über Differenzenrechnung, Springer, Berlin, 1924.

First (m=1) column sequence is: A051189(n-1).
Row sums (signed triangle): A049210(n-1)*(-1)^(n-1).
Row sums (unsigned triangle): A045755(n).
The b=1..7 triangles are: A008275 (Stirling1 triangle), A039683, A051141, A051142, A051150, A051151, A051186.

T(n, m) = T(n-1, m-1) - 8*(n-1)*T(n-1, m) for n >= m >= 1; T(n, m) := 0 for n < m; T(n, 0) := 0 for n >= 1; T(0, 0) = 1.
E.g.f. for the m-th column of the signed triangle: (log(1 + 8*x)/8)^m/m!.
From Petros Hadjicostas, Jun 07 2020: (Start)
T(n,m) = 8^(n-m)*Stirling1(n,m) = 8^(n-m)*A048994(n,m) = 8^(n-m)*A008275(n,m) for n >= m >= 1.
Bivariate e.g.f.-o.g.f.: Sum_{n,m >= 1} T(n,m)*x^n*y^m/n! = exp((y/8)*log(1 + 8*x)) - 1 = (1 + 8*x)^(y/8) - 1. (End)

Showing 1-5 of 5 results.

cp's OEIS Frontend

A045754 7-fold factorials: a(n) = Product_{k=0..n-1} (7*k+1).

Views

Author

Keywords

Links

Crossrefs

Programs

GAP

Magma

Maple

Mathematica

PARI

Sage

Formula

Extensions

A132056 Triangle read by rows, the Bell transform of Product_{k=0..n} 7*k+1 without column 0.

Views

Author

Keywords

Comments

Examples

Links

Crossrefs

Programs

Maple

Mathematica

Formula

Extensions

A049209 a(n) = -Product_{k=0..n} (7*k-1); sept-factorial numbers.

Views

Author

Keywords

Links

Crossrefs

Programs

Magma

Mathematica

Sage

Formula

A051188 Sept-factorial numbers.

Views

Author

Keywords

Comments

Links

Crossrefs

Programs

Magma

PARI

Formula

A051187 Generalized Stirling number triangle of the first kind.

Views

Author

Keywords

Comments

Examples

Links

Crossrefs

Formula