A <- matrix(c(1,1,1,1,-1,1,-1,-1,-1, -5,-3,0),3,4)
A
## [,1] [,2] [,3] [,4]
## [1,] 1 1 -1 -5
## [2,] 1 -1 -1 -3
## [3,] 1 1 -1 0
A[3,] <- A[3,] -A[1,]
A
## [,1] [,2] [,3] [,4]
## [1,] 1 1 -1 -5
## [2,] 1 -1 -1 -3
## [3,] 0 0 0 5