Penelitian ini bertujuan untuk menganalisis pengaruh beberapa indikator sosial ekonomi terhadap pengeluaran per kapita pada kabupaten/kota di Jawa Tengah.
Variabel yang digunakan:
data_jateng <- read.csv("C:/Users/localadmin/Downloads/data_jateng.csv")
head(data_jateng)
## Kabupaten...Kota AHH RLS PHBSP PA MSKN PGLRN U V
## 1 Wonosobo 71.30 6.51 76.49 824 20.32 9969 -7.729 108.792
## 2 Wonogiri 76.00 6.68 89.31 1364 12.90 8765 -7.482 109.055
## 3 Temanggung 75.42 6.90 79.42 2102 11.46 8794 -7.390 108.883
## 4 Tegal 71.14 6.55 81.41 1197 9.90 9136 -7.379 109.624
## 5 Sukoharjo 77.49 8.71 73.93 1085 8.75 10765 -7.646 109.692
## 6 Sragen 75.55 7.04 87.78 839 14.02 12041 -7.739 109.965
str(data_jateng)
## 'data.frame': 35 obs. of 9 variables:
## $ Kabupaten...Kota: chr "Wonosobo" "Wonogiri" "Temanggung" "Tegal" ...
## $ AHH : num 71.3 76 75.4 71.1 77.5 ...
## $ RLS : num 6.51 6.68 6.9 6.55 8.71 7.04 7.87 6.94 7.69 6.87 ...
## $ PHBSP : num 76.5 89.3 79.4 81.4 73.9 ...
## $ PA : int 824 1364 2102 1197 1085 839 1074 572 1111 1137 ...
## $ MSKN : num 20.32 12.9 11.46 9.9 8.75 ...
## $ PGLRN : int 9969 8765 8794 9136 10765 12041 11389 9736 9601 9340 ...
## $ U : num -7.73 -7.48 -7.39 -7.38 -7.65 ...
## $ V : num 109 109 109 110 110 ...
summary(data_jateng)
## Kabupaten...Kota AHH RLS PHBSP
## Length:35 Min. :68.61 Min. : 6.180 Min. :59.69
## Class :character 1st Qu.:73.42 1st Qu.: 6.705 1st Qu.:71.60
## Mode :character Median :74.46 Median : 7.290 Median :78.30
## Mean :74.63 Mean : 7.582 Mean :79.22
## 3rd Qu.:75.90 3rd Qu.: 8.260 3rd Qu.:88.06
## Max. :77.49 Max. :10.500 Max. :97.25
## PA MSKN PGLRN U
## Min. : 164.0 Min. : 4.620 Min. : 7785 Min. :-7.804
## 1st Qu.: 600.0 1st Qu.: 9.325 1st Qu.: 9238 1st Qu.:-7.551
## Median : 901.0 Median :12.420 Median : 9813 Median :-7.322
## Mean : 925.6 Mean :12.491 Mean :10414 Mean :-7.226
## 3rd Qu.:1160.5 3rd Qu.:14.085 3rd Qu.:11379 3rd Qu.:-6.907
## Max. :2195.0 Max. :20.320 Max. :14921 Max. :-6.550
## V
## Min. :108.8
## 1st Qu.:109.7
## Median :110.3
## Mean :110.2
## 3rd Qu.:110.7
## Max. :111.7
colMeans(data_jateng[,2:7])
## AHH RLS PHBSP PA MSKN PGLRN
## 74.63143 7.58200 79.22229 925.62857 12.49143 10414.05714
Hubungan antara pendidikan dan pengeluaran per kapita.
plot(data_jateng$RLS, data_jateng$PGLRN,
main="Hubungan RLS dan Pengeluaran per Kapita",
xlab="Rata-rata Lama Sekolah",
ylab="Pengeluaran per Kapita",
pch=19)
Model regresi yang digunakan adalah:
y = b0 + b1x1 + b2x2 + b3x3 + … + e
Dimana:
model <- lm(PGLRN ~ AHH + RLS + PHBSP + PA + MSKN, data=data_jateng)
summary(model)
##
## Call:
## lm(formula = PGLRN ~ AHH + RLS + PHBSP + PA + MSKN, data = data_jateng)
##
## Residuals:
## Min 1Q Median 3Q Max
## -2109.15 -662.16 -54.25 639.21 2302.45
##
## Coefficients:
## Estimate Std. Error t value Pr(>|t|)
## (Intercept) 6370.2778 9715.1138 0.656 0.517
## AHH -44.2502 136.2015 -0.325 0.748
## RLS 1084.3201 232.5169 4.663 6.46e-05 ***
## PHBSP -1.0028 22.4535 -0.045 0.965
## PA -0.2941 0.3728 -0.789 0.437
## MSKN -41.9035 62.0896 -0.675 0.505
## ---
## Signif. codes: 0 '***' 0.001 '**' 0.01 '*' 0.05 '.' 0.1 ' ' 1
##
## Residual standard error: 1027 on 29 degrees of freedom
## Multiple R-squared: 0.689, Adjusted R-squared: 0.6354
## F-statistic: 12.85 on 5 and 29 DF, p-value: 1.238e-06
coef(model)
## (Intercept) AHH RLS PHBSP PA MSKN
## 6370.2777685 -44.2501704 1084.3201157 -1.0027537 -0.2940785 -41.9034856
plot(data_jateng$RLS, data_jateng$PGLRN,
main="Hubungan RLS dan Pengeluaran per Kapita",
xlab="RLS",
ylab="PGLRN",
pch=19)
abline(lm(PGLRN ~ RLS, data=data_jateng), col="red", lwd=2)
plot(model$residuals,
main="Plot Residual",
ylab="Residual",
xlab="Observasi",
pch=19)
Berdasarkan hasil analisis regresi linear berganda, variabel sosial ekonomi seperti pendidikan, kesehatan, pengangguran dan kemiskinan memiliki hubungan terhadap pengeluaran per kapita pada kabupaten/kota di Jawa Tengah.
Hasil analisis ini dapat digunakan sebagai dasar untuk memahami faktor-faktor yang mempengaruhi kesejahteraan masyarakat di Jawa Tengah.