<\/p>\n
Biasanya, saat kita melakukan regresi linier berganda<\/a> , koefisien regresi yang dihasilkan dalam keluaran model tidak terstandarisasi<\/strong> , artinya koefisien regresi tersebut menggunakan data mentah untuk menemukan garis yang paling sesuai.<\/span><\/p>\n Namun, dimungkinkan untuk membakukan<\/strong> setiap variabel prediktor dan variabel respon (dengan mengurangkan nilai rata-rata setiap variabel dari nilai aslinya dan kemudian membaginya dengan standar deviasi variabel) dan kemudian menjalankan regresi, yang menghasilkan koefisien regresi standar<\/strong> .<\/span><\/p>\n Cara paling sederhana untuk menghitung koefisien regresi standar di R adalah dengan menggunakan fungsi scale()<\/a> untuk membakukan setiap variabel dalam model:<\/span><\/p>\n Contoh berikut menunjukkan cara menghitung koefisien regresi standar dalam praktiknya.<\/span><\/p>\n Misalkan kita memiliki kumpulan data berikut yang berisi informasi tentang umur, ukuran luas, dan harga jual 12 rumah:<\/span><\/p>\n Misalkan kita melakukan regresi linier berganda dengan menggunakan umur<\/strong> dan luas persegi<\/strong> sebagai variabel prediktor dan harga<\/strong> sebagai variabel respon:<\/span><\/p>\n Dari hasil model terlihat koefisien regresi tidak terstandar<\/strong> :<\/span><\/p>\n Pada pandangan pertama, tampak bahwa usia memiliki pengaruh yang jauh lebih besar terhadap harga real estat karena koefisiennya dalam tabel regresi adalah -409.833<\/strong> , dibandingkan dengan hanya 100.866<\/strong> untuk variabel prediktor luas persegi.<\/span><\/p>\n Namun, kesalahan standarnya jauh lebih besar untuk usia dibandingkan untuk luas persegi, itulah sebabnya nilai p yang sesuai sebenarnya besar untuk usia (p = 0,520) dan kecil untuk luas persegi (p = 0,000).<\/span><\/p>\n Penyebab perbedaan koefisien regresi yang ekstrim adalah karena perbedaan ekstrim skala kedua variabel:<\/span><\/p>\n Misalkan kita menormalkan<\/strong> data mentah dan menyesuaikan model regresi baru:<\/span><\/p>\n Koefisien regresi dalam tabel ini terstandarisasi<\/strong> , artinya mereka menggunakan data terstandar agar sesuai dengan model regresi ini.<\/span><\/p>\n Cara menafsirkan koefisien pada tabel adalah sebagai berikut:<\/span><\/p>\n Sekarang kita dapat melihat bahwa ukuran luas mempunyai pengaruh yang jauh lebih besar terhadap harga rumah dibandingkan usia.<\/span><\/p>\n Catatan<\/strong> : Nilai p untuk setiap variabel prediktor sama persis dengan model regresi sebelumnya.<\/span><\/p>\n Saat memutuskan model akhir mana yang akan digunakan, kini kita tahu bahwa luas persegi<\/strong> jauh lebih penting dalam memprediksi harga sebuah rumah dibandingkan usianya<\/strong> .<\/span><\/p>\n Tutorial berikut memberikan informasi tambahan tentang model regresi:<\/span><\/p>\n Cara membaca dan menafsirkan tabel regresi<\/a> Biasanya, saat kita melakukan regresi linier berganda , koefisien regresi yang dihasilkan dalam keluaran model tidak terstandarisasi , artinya koefisien regresi tersebut menggunakan data mentah untuk menemukan garis yang paling sesuai. model <- lm(price ~ age + sqfeet, data=df) Namun, dimungkinkan untuk membakukan setiap variabel prediktor dan variabel respon (dengan mengurangkan nilai rata-rata setiap variabel […]<\/p>\n","protected":false},"author":1,"featured_media":0,"comment_status":"open","ping_status":"open","sticky":false,"template":"","format":"standard","meta":{"footnotes":""},"categories":[11],"tags":[],"yoast_head":"\n model <- lm(price ~ age + sqfeet, data=df)\n<\/strong><\/pre>\n
model <- lm(scale(price) ~ scale(age) + scale(sqfeet), data=df)<\/strong><\/pre>\n
Contoh: Cara menghitung koefisien regresi standar di R<\/strong><\/h2>\n
#create data frame\n<\/span>df <- data. frame<\/span> (age=c(4, 7, 10, 15, 16, 18, 24, 28, 30, 35, 40, 44),\n sqfeet=c(2600, 2800, 1700, 1300, 1500, 1800,\n 1200, 2200, 1800, 1900, 2100, 1300),\n price=c(280000, 340000, 195000, 180000, 150000, 200000,\n 180000, 240000, 200000, 180000, 260000, 140000))\n\n#view data frame\n<\/span>df\n\n age square feet price\n1 4 2600 280000\n2 7 2800 340000\n3 10 1700 195000\n4 15 1300 180000\n5 16 1500 150000\n6 18 1800 200000\n7 24 1200 180000\n8 28 2200 240000\n9 30 1800 200000\n10 35 1900 180000\n11 40 2100 260000\n12 44 1300 140000\n<\/strong><\/pre>\n #fit regression model\n<\/span>model <- lm(price ~ age + sqfeet, data=df)\n\n#view model summary\n<\/span>summary(model)\n\nCall:\nlm(formula = price ~ age + sqfeet, data = df)\n\nResiduals:\n Min 1Q Median 3Q Max \n-32038 -10526 -6139 21641 34060 \n\nCoefficients:\n Estimate Std. Error t value Pr(>|t|) \n(Intercept) 34736.54 37184.32 0.934 0.374599 \nage -409.83 612.46 -0.669 0.520187 \nsqfeet 100.87 15.75 6.405 0.000125 ***\n---\nSignificant. codes: 0 '***' 0.001 '**' 0.01 '*' 0.05 '.' 0.1 ' ' 1\n\nResidual standard error: 24690 on 9 degrees of freedom\nMultiple R-squared: 0.8508, Adjusted R-squared: 0.8176 \nF-statistic: 25.65 on 2 and 9 DF, p-value: 0.0001916\n<\/strong><\/pre>\n\n
\n
#standardize each variable and fit regression model\n<\/span>model_std <- lm(scale(price) ~ scale(age) + scale(sqfeet), data=df)\n\n#turn off scientific notation<\/span>\noptions(scipen= 999<\/span> )\n\n#view model summary\n<\/span>summary(model_std)\n\nCall:\nlm(formula = scale(price) ~ scale(age) + scale(sqfeet), data = df)\n\nResiduals:\n Min 1Q Median 3Q Max \n-0.5541 -0.1820 -0.1062 0.3743 0.5891 \n\nCoefficients:\n Estimate Std. Error t value Pr(>|t|)\n(Intercept) -0.0000000000000002253 0.1232881457926768426 0.000 1.000000\nscale(age) -0.0924421263946849786 0.1381464029075653854 -0.669 0.520187\nscale(sqfeet) 0.8848591938302141635 0.1381464029075653577 6.405 0.000125\n \n(Intercept) \nscale(age) \nscale(sqfeet)***\n---\nSignificant. codes: 0 '***' 0.001 '**' 0.01 '*' 0.05 '.' 0.1 ' ' 1\n\nResidual standard error: 0.4271 on 9 degrees of freedom\nMultiple R-squared: 0.8508, Adjusted R-squared: 0.8176 \nF-statistic: 25.65 on 2 and 9 DF, p-value: 0.0001916\n<\/strong><\/pre>\n\n
Sumber daya tambahan<\/strong><\/span><\/h2>\n
Bagaimana menafsirkan koefisien regresi<\/a>
Cara menginterpretasikan nilai P dalam regresi linier<\/a><\/span><\/p>\n","protected":false},"excerpt":{"rendered":"