login
This site is supported by donations to The OEIS Foundation.

 

Logo


Hints
(Greetings from The On-Line Encyclopedia of Integer Sequences!)
A229674 a(n) = Sum_{k = 0..n} Product_{j = 0..6} C(n+j*k,k). 3
1, 5041, 681120721, 182519583427441, 66479594535132382801, 28839847393654717358640241, 14008219182384095498700747103921, 7364217994146042440421602767480184881, 4104535666620019954310735707010727096941521, 2392974957158188560683670847243199936518562761441 (list; graph; refs; listen; history; text; internal format)
OFFSET

0,2

COMMENTS

Number of lattice paths from {n}^7 to {0}^7 using steps that decrement one component or all components by 1.

LINKS

Alois P. Heinz, Table of n, a(n) for n = 0..100

FORMULA

a(n) = Sum_{k = 0..n} multinomial(n+6*k; n-k, {k}^7).

G.f.: Sum_{k >= 0} (7*k)!/k!^7 * x^k / (1-x)^(7*k+1).

exp( Sum_{n >= 1} a(n)*x^n/n ) = 1 + x + 2521*x^2 + 227042761*x^3 + 45630126074821*x^4 + ... appears to have integer coefficients. - Peter Bala, Jan 13 2016

MAPLE

with(combinat):

a:= n-> add(multinomial(n+6*k, n-k, k$7), k=0..n):

seq(a(n), n=0..10);

MATHEMATICA

multinomial[n_, k_List] := n!/Times @@ (k!); a[n_] := Sum[multinomial[n+6*k, Join[{n-k}, Array[k&, 7]]], {k, 0, n}]; Table[a[n], {n, 0, 10}] (* Jean-Fran├žois Alcover, Dec 27 2013, translated from Maple *)

CROSSREFS

Column k = 7 of A229142.

Sequence in context: A045517 A068897 A200730 * A031659 A243133 A031569

Adjacent sequences:  A229671 A229672 A229673 * A229675 A229676 A229677

KEYWORD

nonn,easy

AUTHOR

Alois P. Heinz, Sep 27 2013

STATUS

approved

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

License Agreements, Terms of Use, Privacy Policy. .

Last modified November 16 23:51 EST 2018. Contains 317275 sequences. (Running on oeis4.)