login
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
OFFSET
1,2
COMMENTS
T(n,2) = A052849(n) for n>1.
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]
-- Reinhard Zumkeller, Oct 27 2013
CROSSREFS
Cf. A051597.
Sequence in context: A129595 A094508 A183517 * A047675 A187199 A297907
KEYWORD
nonn,tabl,look
AUTHOR
Reinhard Zumkeller, Jan 21 2003
EXTENSIONS
Corrected by André F. Labossière, Sep 27 2004
STATUS
approved