|
Search: id:A123163
|
|
|
| A123163 |
|
Triangle read by rows: binomial[(n-m)^2,m^2]. |
|
+0
2
|
|
| 1, 1, 0, 1, 1, 0, 1, 4, 0, 0, 1, 9, 1, 0, 0, 1, 16, 126, 0, 0, 0, 1, 25, 1820, 1, 0, 0, 0, 1, 36, 12650, 11440, 0, 0, 0, 0, 1, 49, 58905, 2042975, 1, 0, 0, 0, 0, 1, 64, 211876, 94143280, 2042975, 0, 0, 0, 0, 0, 1, 81, 635376, 2054455634, 7307872110, 1, 0, 0, 0, 0, 0
(list; table; graph; listen)
|
|
|
OFFSET
|
1,8
|
|
|
FORMULA
|
a(n,m) = (n^2 - 2*n*m + m^2)!/((m^2)!(n^2 - 2*n*m)!)
|
|
EXAMPLE
|
1
1, 0
1, 1, 0
1, 4, 0, 0
1, 9, 1, 0, 0
1, 16, 126, 0, 0, 0
1, 25, 1820, 1, 0, 0, 0
1, 36, 12650, 11440, 0, 0, 0, 0
|
|
MATHEMATICA
|
t[n_, m_] = (n^2 - 2*n*m + m^2)!/((m^2)!(n^2 - 2*n*m)!); a = Table[Table[t[n, m], {m, 0, n}], {n, 0, 10}]; Flatten[a]
|
|
CROSSREFS
|
Sequence in context: A078669 A046783 A134832 this_sequence A058305 A020808 A091467
Adjacent sequences: A123160 A123161 A123162 this_sequence A123164 A123165 A123166
|
|
KEYWORD
|
nonn,tabl
|
|
AUTHOR
|
Roger Bagula (rlbagulatftn(AT)yahoo.com), Oct 02 2006
|
|
EXTENSIONS
|
Edited by N. J. A. Sloane (njas(AT)research.att.com), Oct 04 2006
|
|
|
Search completed in 0.002 seconds
|
