powered by
kron(a, b)
(n*p x m*q
a
(n x m
b
(p x q)
a <- diag(1, 2, 2) b <- matrix(1:4, 2, 2) kron(a, b) kron(b, a)
Run the code above in your browser using DataLab