=====================================================

Nama Mahasiswa : โ€™Izzan Nuha Zamroni

NIM : 220605110082

Kelas : C

Mata Kuliah : Linear Algebra

Dosen Pengampuh : Prof.Dr.Suhartono,M.Kom

Jurusan : Teknik Informatika

Universitas : UIN Maulana Malik Ibrahim Malang

=====================================================

library(matlib)
A <- matrix(c(1,2,1,1), nrow = 2, ncol = 2)
b <- c(4, 5)
Solve(A, b)
## x1    =  1 
##   x2  =  3
solve(A, b)
## [1] 1 3
plotEqn(A,b)
##   x[1] + x[2]  =  4 
## 2*x[1] + x[2]  =  5

A <- matrix(c(1,-2,-1,2,3,2,3,-2,1), nrow = 3, ncol = 3)
b <- c(6, -1, 2)
Solve(A, b)
## x1      =  1 
##   x2    =  1 
##     x3  =  1
solve(A, b)
## [1] 1 1 1
plotEqn3d(A,b, xlim=c(0,5), ylim=c(0,4))
A <- matrix(c(1,0,1,0,1,0,0,1,0,1,1,0,0,1,0,1),nrow=4,ncol=4)
b <- c(475, 489, 542,422)
Solve(A, b)
## x1     - 1*x4  =   53 
##   x2     + x4  =  422 
##     x3   + x4  =  489 
##             0  =    0
b <- c(1298, 1948, 465, 605, 451, 338, 260, 183, 282, 127, 535)