|
|
A080046
|
|
Multiplicative Pascal triangle, read by rows: T(n,1)=T(n,n)=n and T(n,k) = T(n-1,k-1) * T(n-1,k).
|
|
6
|
|
|
1, 2, 2, 3, 4, 3, 4, 12, 12, 4, 5, 48, 144, 48, 5, 6, 240, 6912, 6912, 240, 6, 7, 1440, 1658880, 47775744, 1658880, 1440, 7, 8, 10080, 2388787200, 79254226206720, 79254226206720, 2388787200, 10080, 8, 9, 80640, 24078974976000
(list;
table;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
1,2
|
|
COMMENTS
|
|
|
LINKS
|
|
|
EXAMPLE
|
1
2 2
3 4 3
4 12 12 4
|
|
PROG
|
(Haskell)
a080046 n k = a080046_tabl !! (n-1) !! (k-1)
a080046_row n = a080046_tabl !! (n-1)
a080046_tabl = iterate f [1] where
f (x:xs) = [x + 1] ++ (zipWith (*) xs $ reverse xs) ++ [x + 1]
|
|
CROSSREFS
|
|
|
KEYWORD
|
|
|
AUTHOR
|
|
|
EXTENSIONS
|
|
|
STATUS
|
approved
|
|
|
|