A <- matrix(c(1,2,3,-2,0,1,-2,-1,1,1,3,1), ncol = 4, byrow = TRUE) B <- matrix(c(3,4,0,2), ncol = 1, byrow = TRUE) C <- A%*%B print (C)
## [,1] ## [1,] 7 ## [2,] 2 ## [3,] 9