########## EXAMPLE 1 ##########
X <- matrix(1,4,2)
Y <- matrix(1:4,2,2)
krprod(X,Y)
########## EXAMPLE 2 ##########
X <- matrix(1:2,4,2)
Y <- matrix(1:4,2,2)
krprod(X,Y)
########## EXAMPLE 3 ##########
X <- matrix(1:2,4,2,byrow=TRUE)
Y <- matrix(1:4,2,2)
krprod(X,Y)
Run the code above in your browser using DataLab