title: “Memecahkan Sistem persamaan Linear dengan R” author:“Nama = Intan Nurhidayah|| Nim = 220605110039 || Mata Kuliah = Linear Algebra || Dosen Pengampu = Prof.Dr.SUHARTONO,M.Kom || Teknik Informatika || Universitas Islam Negeri Malang”

fungsi solve digunakan untuk menyelesaikan sistem persamaan linear atau matriks.

Meskipun kita dapat menyelesaikan sistem persamaan garis dengan pemecahan() fungsi, kita akan menggunakan library matlib karena itu fungsi untuk memvisualisasikan apa yang terjadi secara geometris. Untuk menginstal library matlib, cukup mengetik:

install.packages(“matlib”, dependencies=TRUE)

Dan untuk memanggil library matlib maka cukup ketik kode sebagai berikut :

library(matlib)

buat suatu matrix dengan baris dan kolommnya masing-masing dua. untuk membuat matrix maka ketikkan sebagai berikut :

A <-matrix(c(1,2,1,1),nrow=2,ncol=2)

maka untuk melihat struktur dari matrix yang kita buat , maka tulis ulang variabel pada lembar CRAN seperti berikut

A

##      [,1] [,2]
## [1,]    1    1
## [2,]    2    1

dan dengan library matlib kita bisa juga untuk membuat vektor

b <-c(4,5)
b

## [1] 4 5

A2 <-matrix(c(1,-2,-1,2,3,2,3,-2,1),nrow=3,ncol=3)
b2 <-c(6,-1,2)
Solve(A2, b2)

## x1      =  1 
##   x2    =  1 
##     x3  =  1

dan dengan library matlib kita bisa juga untuk membuat vektor

a <-c(2,6)
a

## [1] 2 6

dan jika kita ingin untuk menyelesaikan sistem linear equations maka kita bisa bisa menuliskan seperti berikut :

Solve(A,b)

## x1    =  1 
##   x2  =  3

dan dalam library matlib kita dapat memvisualisasikan geometri sistem linear dengan “plotEqn”

plotEqn(A,b)

##   x[1] + x[2]  =  4 
## 2*x[1] + x[2]  =  5

bisa juga melakukan visualisasi dalam bentuk 3D sebagai berikut namun harus menggunakan 3 variabel maka kita tulis ulang matrix

a2 <-matrix(c(1,-2,-1,2,3,2,3,-2,1),nrow=3,ncol=3)
b2 <-c(6,-1,2)
Solve(a2, b2)

## x1      =  1 
##   x2    =  1 
##     x3  =  1

maka akan muncul output sebagai berikut :

v=plotEqn3d(a2,b2, xlim=c(0,4),ylim=c(0,4))
v