login
The OEIS is supported by the many generous donors to the OEIS Foundation.

 

Logo
Hints
(Greetings from The On-Line Encyclopedia of Integer Sequences!)
A182926 Row sums of absolute values of A182928. 6
1, 2, 3, 10, 25, 161, 721, 5706, 40881, 385687, 3628801, 41268613, 479001601, 6324319717, 87212177053, 1317906346186, 20922789888001, 357099708702023, 6402373705728001, 121882752536893635, 2432928081076384321, 51140835669924352717 (list; graph; refs; listen; history; text; internal format)
OFFSET
1,2
COMMENTS
The sum of multinomial coefficients can be computed recursively as
A005651(0) = 1 and A005651(n) = Sum_{1<=k<=n} binomial(n-1,k-1) * A182926(k) * A005651(n-k).
Möbius inversion yields: 1, 1, 2, 8, 24, 157, 720, 5696, 40878,...
A182927(2*i+1) = A182926(2*i+1).
LINKS
FORMULA
a(n) = Sum_{d|n} n!/(d*((n/d)!)^d).
E.g.f.: Sum_{k>=1} log(1/(1 - x^k/k!)). - Ilya Gutkovskiy, May 21 2019
EXAMPLE
a(6) = 1 + 10 + 30 + 120 = 161.
MAPLE
A182926 := proc(n) local d;
add(n!/(d*((n/d)!)^d), d = numtheory[divisors](n)) end:
seq(A182926(i), i = 1..22);
MATHEMATICA
a[n_] := Sum[ Abs[ -n!/(d*(-(n/d)!)^d)], {d, Divisors[n]}]; Table[ a[n], {n, 1, 22}] (* Jean-François Alcover, Jul 29 2013 *)
CROSSREFS
Sequence in context: A246437 A341265 A005158 * A005225 A211208 A303836
KEYWORD
nonn
AUTHOR
Peter Luschny, Apr 16 2011
STATUS
approved

Lookup | Welcome | Wiki | Register | Music | Plot 2 | Demos | Index | Browse | More | WebCam
Contribute new seq. or comment | Format | Style Sheet | Transforms | Superseeker | Recents
The OEIS Community | Maintained by The OEIS Foundation Inc.

License Agreements, Terms of Use, Privacy Policy. .

Last modified February 21 10:54 EST 2024. Contains 370233 sequences. (Running on oeis4.)