#Memprediksi IPM (Indeks Pembangunan Manusia) Wilayah Kota Tegal berdasarkan data 5 tahun terakhir dengan keterangan sebagai berikut : - AHH : Angka Harapan HIdup (TAhun) - RLS : Rata-Rata Lama SEkolah (Tahun) - HLS : Harapan Lama Sekolah (Tahun) - PKT : Pengeluaran Per kapita Per Tahun Yang Disesuaikan (Ribu Rp)

#kurangi 1 kolom

dataset = dataset[,-1]
View(dataset)

#formula regresi linear berganda

model = lm(IPM~AHH+RLS+HLS+PKT, data = dataset)

#dari perhitungan regresi linear berganda akan ketemu model persamaannya, lalu buat prediksi menggunakan fungsi predict

databaru = (data.frame(AHH=72,15000,RLS=8,220000,HLS=11,12000,PKT=12019328 ))
data_predict = predict(model,databaru)
data_predict
##        1 
## -7455320

#Langkah Kedua, Untuk mengetahui tingkat kesalahan/error dari data yg telah diprediksi diatas, kita bisa gunakan Mean Absolute Deviation (MAD). #Rumus MAD, MAD = (data aktual - data prediksi)/banyak data yg digunakan #Maka kita gunakan data IPM 2020AA #Hasil IPM 2020 = 75.07 #Prediksi IPM 2021 = 75.26725 (75.07-75.26725)/6 #Setelah dilakukan pengujian rata-rata tingkat kesalahan/error, telah didapatkan hasil yang cukup kecil yaitu -0.032875 #Maka bisa disimpulkan bahwa hasil prediksi IPM 2021 sebesar 75.26725 hampir tepat #Catatan: Dalam MAD, tanda positif atau negatif itu dihiraukan, karena yang diukur hanya besar kesalahan secara absolut. #Catatan: Nilai Absolut adalah nilai suatu bilangan riil tanpa tanda plus atau minus (Sumber: Wikipedia). #Referensi Data Yang Digunakan : https://drive.google.com/file/d/1MkaCbMWoI-uzqxfkFXOt_s9ZN56Ma_-W/view?usp=sharing

R Markdown

This is an R Markdown document. Markdown is a simple formatting syntax for authoring HTML, PDF, and MS Word documents. For more details on using R Markdown see http://rmarkdown.rstudio.com.

When you click the Knit button a document will be generated that includes both content as well as the output of any embedded R code chunks within the document. You can embed an R code chunk like this:

summary(cars)
##      speed           dist       
##  Min.   : 4.0   Min.   :  2.00  
##  1st Qu.:12.0   1st Qu.: 26.00  
##  Median :15.0   Median : 36.00  
##  Mean   :15.4   Mean   : 42.98  
##  3rd Qu.:19.0   3rd Qu.: 56.00  
##  Max.   :25.0   Max.   :120.00

Including Plots

You can also embed plots, for example:

Note that the echo = FALSE parameter was added to the code chunk to prevent printing of the R code that generated the plot.