|
| |
|
|
A051188
|
|
Sept-factorial numbers.
|
|
17
| |
|
|
1, 7, 98, 2058, 57624, 2016840, 84707280, 4150656720, 232436776320, 14643516908160, 1025046183571200, 78928556134982400, 6629998715338521600, 603329883095805465600, 59126328543388935628800
(list; graph; refs; listen; history; internal format)
|
|
|
|
OFFSET
| 0,2
|
|
|
COMMENTS
| 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
a(n) = 7*A034834(n) = product(7*k,k=1..n), n >= 1.
|
|
|
LINKS
| 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
|
|
|
FORMULA
| a(n) = n!*7^n =: (7*n)(!^7);
E.g.f. 1/(1-7*x)
G.f.: 1/(1-7x/(1-7x/(1-14x/(1-14x/(1-21x/(1-21x/(1-28x/(1-28x/(1-... (continued fraction). - DELEHAM Philippe, Jan 08 2012
|
|
|
MAPLE
| with(combstruct):A:=[N, {N=Cycle(Union(Z$7))}, labeled]: seq(count(A, size=n)/7, n=0..15); - Zerinvary Lajos (zerinvarylajos(AT)yahoo.com), Dec 05 2007
|
|
|
MATHEMATICA
| s=1; lst={s}; Do[s+=n*s; AppendTo[lst, s], {n, 6, 5!, 7}]; lst [From Vladimir Orlovsky (4vladimir(AT)gmail.com), Nov 08 2008]
|
|
|
PROG
| (MAGMA) [7^n*Factorial(n): n in [0..20]]; // Vincenzo Librandi, Oct 05 2011
|
|
|
CROSSREFS
| Cf. A000142, A000165, A032031, A047053, A052562, A047058, A051186, A053106, A000165, A049209, A147585, A144827, A144739, A084947, A045754.
Sequence in context: A036293 A133679 A156266 * A113134 A092818 A041087
Adjacent sequences: A051185 A051186 A051187 * A051189 A051190 A051191
|
|
|
KEYWORD
| easy,nonn
|
|
|
AUTHOR
| Wolfdieter Lang (wolfdieter.lang(AT)physik.uni-karlsruhe.de)
|
| |
|
|