A147585 -id:A147585 - 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

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)

A144739 7-factorial numbers A114799(7n+3): Partial products of A017017(k) = 7k+3, a(0) = 1.

Original entry on oeis.org

1, 3, 30, 510, 12240, 379440, 14418720, 648842400, 33739804800, 1990648483200, 131382799891200, 9590944392057600, 767275551364608000, 66752972968720896000, 6274779459059764224000, 633752725365036186624000, 68445294339423908155392000, 7871208849033749437870080000

Offset: 0

Philippe Deléham, Sep 20 2008

nonn

			a(0)=1, a(1)=3, a(2)=3*10=30, a(3)=3*10*17=510, a(4)=3*10*17*24=12240, ...

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

Cf. A114799, A001710, A001147, A032031, A008545, A047056, A011781, A045754, A084947, A144827, A147585, A049209, A051188.

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

[ 1 ] cat [ &*[ (7*k+3): k in [0..n] ]: n in [0..20] ]; // Klaus Brockhaus, Nov 10 2008

a:= n-> product(7*j+3, j=0..n-1); seq(a(n), n=0..20); # G. C. Greubel, Aug 19 2019

Table[7^n*Pochhammer[3/7, n], {n,0,20}] (* G. C. Greubel, Aug 19 2019 *)

a(n)=prod(i=1,n,7*i-4) \\ Charles R Greathouse IV, Jul 02 2013

[product(7*k+3 for k in (0..n-1)) for n in (0..20)] # G. C. Greubel, Aug 19 2019

a(n) = Sum_{k=0..n} A132393(n,k)*3^k*7^(n-k).
G.f.: 1/(1-3*x/(1-7*x/(1-10*x/(1-14*x/(1-17*x/(1-21*x/(1-24*x/(1-... (continued fraction). - Philippe Deléham, Jan 08 2012
a(n) = (-4)^n*Sum_{k=0..n} (7/4)^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
From Ilya Gutkovskiy, Mar 23 2017: (Start)
E.g.f.: 1/(1 - 7*x)^(3/7).
a(n) ~ sqrt(2*Pi)*7^n*n^n/(exp(n)*n^(1/14)*Gamma(3/7)). (End)
a(n) = A114799(7*n-4). - M. F. Hasler, Feb 23 2018
D-finite with recurrence: a(n) +(-7*n+4)*a(n-1)=0. - R. J. Mathar, Feb 21 2020
Sum_{n>=0} 1/a(n) = 1 + (e/7^4)^(1/7)*(Gamma(3/7) - Gamma(3/7, 1/7)). - Amiram Eldar, Dec 19 2022

A144827 Partial products of successive terms of A017029; a(0)=1.

Original entry on oeis.org

1, 4, 44, 792, 19800, 633600, 24710400, 1136678400, 60243955200, 3614637312000, 242180699904000, 17921371792896000, 1451631115224576000, 127743538139762688000, 12135636123277455360000, 1237834884574300446720000, 134924002418598748692480000, 15651184280557454848327680000

Offset: 0

Philippe Deléham, Sep 21 2008

nonn

			a(0)=1, a(1)=4, a(2)=4*11=44, a(3)=4*11*18=792, a(4)=4*11*18*25=19800, ...

T. D. Noe, Table of n, a(n) for n = 0..100

Cf. A001715, A002866, A007559, A008546, A045754, A047053, A132393.

Cf. A049209, A049308, A051188, A084947, A144739, A147585.

[ 1 ] cat [ &*[ (7*k+4): k in [0..n] ]: n in [0..14] ]; // Klaus Brockhaus, Nov 10 2008

FoldList[Times,1,Range[4,150,7]] (* Harvey P. Dale, Apr 25 2014 *)

[1]+[4*7^(n-1)*rising_factorial(11/7, n-1) for n in (1..30)] # G. C. Greubel, Feb 22 2022

a(n) = Sum_{k=0..n} A132393(n,k)*4^k*7^(n-k).
G.f.: 1/(1-4*x/(1-7*x/(1-11*x/(1-14*x/(1-18*x/(1-21*x/(1-25*x/(1-... (continued fraction). - Philippe Deléham, Jan 08 2012
a(n) = (-3)^n*Sum_{k=0..n} (7/3)^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
From Ilya Gutkovskiy, Mar 23 2017: (Start)
E.g.f.: 1/(1 - 7*x)^(4/7).
a(n) ~ sqrt(2*Pi)*7^n*n^(n+1/14)/(exp(n)*Gamma(4/7)). (End)
a(n) = 4*7^(n-1)*Pochhammer(n-1, 11/7) with a(0) = 1. - G. C. Greubel, Feb 22 2022
Sum_{n>=0} 1/a(n) = 1 + (e/7^3)^(1/7)*(Gamma(4/7) - Gamma(4/7, 1/7)). - Amiram Eldar, Dec 19 2022

Corrected a(9) by Vincenzo Librandi, Jul 14 2011

A034832 a(n) = n-th sept-factorial number divided by 5.

Original entry on oeis.org

1, 12, 228, 5928, 195624, 7824960, 367773120, 19859748480, 1211444657280, 82378236695040, 6178367752128000, 506626155674496000, 45089727855030144000, 4328613874082893824000, 445847229030538063872000, 49043195193359187025920000, 5738053837623024882032640000

Offset: 1

Wolfdieter Lang

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

Cf. A045754, A034829, A034830, A034831, A034833, A034834, A084947, A147585.

Rest[FoldList[Times,1,7*Range[20]-2]/5] (* Harvey P. Dale, May 30 2013 *)
Drop[With[{nn = 50}, CoefficientList[Series[(-1 + (1 - 7*x)^(-5/7))/5, {x, 0, nn}], x]*Range[0, nn]!], 1] (* G. C. Greubel, Feb 22 2018 *)

my(x='x+O('x^30)); Vec(serlaplace((-1 + (1-7*x)^(-5/7))/5)) \\ G. C. Greubel, Feb 22 2018

5*a(n) = (7*n-2)(!^7) = Product_{j=1..n} (7*j-2).
E.g.f.: (-1 + (1-7*x)^(-5/7))/5.
From Amiram Eldar, Dec 20 2022: (Start)
a(n) = A147585(n+1)/5.
Sum_{n>=1} 1/a(n) = 5*(e/7^2)^(1/7)*(Gamma(5/7) - Gamma(5/7, 1/7)). (End)

More terms from G. C. Greubel, Feb 22 2018

A153271 Triangle T(n, k) = Product_{j=0..k} (j*n + prime(m)), with T(n, 0) = prime(m) and m = 3, read by rows.

Original entry on oeis.org

5, 5, 30, 5, 35, 315, 5, 40, 440, 6160, 5, 45, 585, 9945, 208845, 5, 50, 750, 15000, 375000, 11250000, 5, 55, 935, 21505, 623645, 21827575, 894930575, 5, 60, 1140, 29640, 978120, 39124800, 1838865600, 99298742400, 5, 65, 1365, 39585, 1464645, 65909025, 3493178325, 213083877825, 14702787569925

Offset: 0

Roger L. Bagula, Dec 22 2008

Row sums are {5, 35, 355, 6645, 219425, 11640805, 917404295, 101177741765, 14919432040765, 2839006665525525, 677815000136926955, ...}.

			Triangle begins as:
  5;
  5, 30;
  5, 35, 315;
  5, 40, 440,  6160;
  5, 45, 585,  9945, 208845;
  5, 50, 750, 15000, 375000, 11250000;
  5, 55, 935, 21505, 623645, 21827575, 894930575;

G. C. Greubel, Rows n = 0..100 of triangle, flattened

Cf. A153271 (m=2), this sequence (m=3), A153272 (m=4).
Sequences related to m values:
m=2: A001147, A001710, A008545, A032031, A047056, A144739, A144758.
m=3: A001720, A007696, A008543, A034000, A051577, A052562, A147585, A147625, A147629.

m:=3;
function T(n,k)
  if k eq 0 then return NthPrime(m);
  else return (&*[j*n + NthPrime(m): j in [0..k]]);
  end if; return T; end function;
[T(n,k): k in [0..n], n in [0..10]]; // G. C. Greubel, Dec 03 2019

m:=3; seq(seq(`if`(k=0, ithprime(m), mul(j*n + ithprime(m), j=0..k)), k=0..n), n=0..10); # G. C. Greubel, Dec 03 2019

T[n_, k_, m_]:= If[k==0, Prime[m], Product[j*n + Prime[m], {j,0,k}]];
Table[T[n,k,3], {n,0,10}, {k,0,n}]//Flatten

T(n,k) = my(m=3); if(k==0, prime(m), prod(j=0,k, j*n + prime(m)) ); \\ G. C. Greubel, Dec 03 2019

def T(n, k):
    m=3
    if (k==0): return nth_prime(m)
    else: return product(j*n + nth_prime(m) for j in (0..k))
[[T(n, k) for k in (0..n)] for n in (0..10)] # G. C. Greubel, Dec 03 2019

T(n, k) = Product_{j=0..k} (j*n + prime(m)), with T(n, 0) = prime(m) and m = 3.

Edited by G. C. Greubel, Dec 03 2019

A020030 Nearest integer to Gamma(n + 5/7)/Gamma(5/7).

Original entry on oeis.org

1, 1, 1, 3, 12, 58, 333, 2233, 17225, 150104, 1458150, 15623032, 183012659, 2326875239, 31911431853, 469553925838, 7378704548888, 123329776031415, 2184698889699346, 40885079221516335, 806020133224179176

Offset: 0

Simon Plouffe

nonn

Gamma(n + 5/7)/Gamma(5/7) = 1, 5/7, 60/49, 1140/343, 29640/2401, 978120/16807, 39124800/117649, ... - R. J. Mathar, Sep 04 2016

Cf. A147585, A020075, A020120, A220606.

Digits := 64:f := proc(n,x) round(GAMMA(n+x)/GAMMA(x)); end;

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

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

A144739 7-factorial numbers A114799(7*n+3): Partial products of A017017(k) = 7*k+3, a(0) = 1.

Views

Author

Keywords

Examples

Links

Crossrefs

Programs

GAP

Magma

Maple

Mathematica

PARI

Sage

Formula

A144827 Partial products of successive terms of A017029; a(0)=1.

Views

Author

Keywords

Examples

Links

Crossrefs

Programs

Magma

Mathematica

SageMath

Formula

Extensions

A034832 a(n) = n-th sept-factorial number divided by 5.

Views

Author

Keywords

Links

Crossrefs

Programs

Mathematica

PARI

Formula

Extensions

A153271 Triangle T(n, k) = Product_{j=0..k} (j*n + prime(m)), with T(n, 0) = prime(m) and m = 3, read by rows.

Views

Author

A144739 7-factorial numbers A114799(7n+3): Partial products of A017017(k) = 7k+3, a(0) = 1.