# NOT RUN {
mat1 <- matrix(c(0,1,1,0,0,1,1,1),4,2)
mat2 <- matrix(c(0,1,0,1,0,1,0,1),4,2)
mat3 <- matrix(c(0,0,1,1,0,0,1,1),4,2)
lmat <- list(mat1 = mat1, mat2 = mat2, mat3 = mat3)
model1 <- netlm(mat1 ~ mat2 + mat3, lmat)
summary(model1)
# }
Run the code above in your browser using DataLab