The OEIS mourns the passing of Jim Simons and is grateful to the Simons Foundation for its support of research in many branches of science, including the OEIS.
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!)
A212857 Number of 4 X n arrays with rows being permutations of 0..n-1 and no column j greater than column j-1 in all rows. 10
1, 1, 15, 1135, 271375, 158408751, 191740223841, 429966316953825, 1644839120884915215, 10079117505143103766735, 94135092186827772028779265, 1287215725538576868883610346465, 24929029117106417518788960414909025, 664978827664071363541997348802227351425 (list; graph; refs; listen; history; text; internal format)
OFFSET
0,3
COMMENTS
From Petros Hadjicostas, Sep 08 2019: (Start)
We generalize Daniel Suteu's recurrence from A212856. Notice first that, in the notation of Abramson and Promislow (1978), we have a(n) = R(m=4, n, t=0).
Letting y=0 in Eq. (8), p. 249, of Abramson and Promislow (1978), we get 1 + Sum_{n >= 1} R(m,n,t=0)*x^n/(n!)^m = 1/f(-x), where f(x) = Sum_{i >= 0} (x^i/(i!)^m). Matching coefficients, we get Sum_{s = 1..n} R(m, s, t=0) * (-1)^(s-1) * binomial(n,s)^m = 1, from which the recurrence in the Formula section follows.
(End)
LINKS
Seiichi Manyama, Table of n, a(n) for n = 0..144 (terms n=1..19 from R. H. Hardin)
Morton Abramson and David Promislow, Enumeration of arrays by column rises, J. Combinatorial Theory Ser. A 24(2) (1978), 247-250; see Eq. (8) on p. 249.
FORMULA
a(n) = (-1)^(n-1) + Sum_{s = 1..n-1} a(s) * (-1)^(n-s-1) * binomial(n,s)^m for n >= 2 with a(1) = 1. Here m = 4. - Petros Hadjicostas, Sep 08 2019
a(n) = (n!)^4 * [x^n] 1 / (1 + Sum_{k>=1} (-x)^k / (k!)^4). (see Petros Hadjicostas's comment on Sep 08 2019) - Seiichi Manyama, Jul 18 2020
EXAMPLE
Some solutions for n=3:
1 2 0 1 0 2 1 0 2 2 1 0 2 0 1 2 1 0 1 0 2
2 1 0 1 0 2 0 2 1 0 2 1 2 1 0 1 0 2 2 1 0
1 2 0 2 1 0 1 0 2 0 1 2 2 1 0 2 1 0 1 2 0
2 1 0 0 1 2 2 1 0 2 1 0 1 0 2 2 1 0 2 1 0
MAPLE
A212857 := proc(n) sum(z^k/k!^4, k = 0..infinity);
series(%^x, z=0, n+1): n!^4*coeff(%, z, n); add(abs(coeff(%, x, k)), k=0..n) end:
seq(A212857(n), n=1..13); # Peter Luschny, May 27 2017
MATHEMATICA
T[n_, k_] := T[n, k] = If[k == 0, 1, -Sum[Binomial[k, j]^n*(-1)^j*T[n, k - j], {j, 1, k}]];
a[n_] := T[4, n];
Table[a[n], {n, 0, 13}] (* Jean-François Alcover, Apr 01 2024, after Alois P. Heinz in A212855 *)
CROSSREFS
Row 4 of A212855.
Sequence in context: A236329 A129764 A027552 * A266581 A337677 A098210
KEYWORD
nonn
AUTHOR
R. H. Hardin, May 28 2012
EXTENSIONS
a(0)=1 prepended by Seiichi Manyama, Jul 18 2020
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 May 16 03:59 EDT 2024. Contains 372549 sequences. (Running on oeis4.)