Regresi Linier menggunakan R(statistik)

Selamat malam semua :)
Membosankan sekali malam ini ga ada kerjaan, dari pada nggangur mending posting blog buat berbagi ilmu walaupun tidak seberapa...hehe... :D
kali ini saya akan posting mengenai regresi linier menggunakan program R statistik. Pada posting sebelumnya saya telah posting mengenai regresi linier menggunakan SPSS. Berikut cara regresi linier menggunakan program R dengan kode manual :
Berikut adalah kodenya
#Buat data x dan y yang akan diregresi linier
x<-c(1,3,5,6,7,8,10,12)
y=c(6,8,9,12,14,17,23,17)
##  hitung sigma(xi-xbar)
x-mean(x)
sum(x-mean(x))
sum(y-mean(y))
##menggabar data asli
plot(x,y)
n=length(x)
x*y
sigmaxy=sum(x*y)
x^2
sigmax2=sum(x^2)
b=(sigmaxy-n*mean(x)*mean(y))/(sigmax2-n*mean(x)^2)
a=mean(y)-b*mean(x)
yhat=a+b*x
#menggambar data asli  dan hasil dari regresi linier
plot(x,y)
abline(a,b)
Dari program diatas akan dihasilkan gambar sebagai berikut :

Demikian tutorial yang dapat saya bagikan semoga bermanfaat :)

Untuk dasar teori dapat di link berikut : click