cara membuat data dalam bentuk victor.
#creat simple data
X <- c(15,17,19,20,22,31,25,50)
Y <- c(150,200,235,220,300,310,400)
#print sample
X
## [1] 15 17 19 20 22 31 25 50
Y
## [1] 150 200 235 220 300 310 400
#simple linear regresion
Y = a + bx
Y = 170 + 17x
plot(Y - X, ylab="Y" , pch=20)
## Warning in Y - X: longer object length is not a multiple of shorter object
## length
#systematic relationship to the plot
abline(a=310, b=-40)