DAT 605 - Discussion Week1

Chapter SLE, Section SSLE - Question C30 (pg. 14)

Finding all Soluntions to linear system of equation using R

A <- matrix(data=c(1, 1, 2, -1),nrow=2,ncol=2,byrow=TRUE)    
b <- matrix(data=c(5, 3),nrow=2,ncol=1,byrow=FALSE)
solve(A)%*% b

##          [,1]
## [1,] 2.666667
## [2,] 2.333333