Cara membuat Data dalam bentuk vektor
#create sample data
X<- c(15, 17, 19, 20, 22, 23, 25, 50)
Y<- c(150, 200, 235, 220, 267, 300, 310, 400)
#print sample
X
## [1] 15 17 19 20 22 23 25 50
Y
## [1] 150 200 235 220 267 300 310 400
Y = a + Bx
Y = 170 + 17x
’’’{r} plot(Y - X, ylab=“Y”, pch=20 )
plot(Y - X, ylab="Y", pch=20 )
abline(a =170, b=17)