Bagaimana cara menambahkan persamaan regresi ke plot di r
Seringkali Anda mungkin ingin menambahkan persamaan regresi ke plot di R sebagai berikut:
Untungnya, hal ini cukup mudah dilakukan dengan menggunakan fungsi dalam paket ggplot2 dan ggpubr .
Tutorial ini memberikan contoh langkah demi langkah tentang cara menggunakan fungsi dalam paket ini untuk menambahkan persamaan regresi ke plot di R.
Langkah 1: Buat datanya
Pertama, mari buat beberapa data palsu untuk digunakan:
#make this example reproducible set. seeds (1) #create data frame df <- data. frame (x = c(1:100)) df$y <- 4*df$x + rnorm(100, sd=20) #view head of data frame head(df) xy 1 1 -8.529076 2 2 11.672866 3 3 -4.712572 4 4 47.905616 5 5 26.590155 6 6 7.590632
Langkah 2: Buat plot dengan persamaan regresi
Selanjutnya, kita akan menggunakan sintaks berikut untuk membuat plot sebar dengan garis regresi dan persamaan yang sesuai:
#load necessary libraries library (ggplot2) library (ggpubr) #create plot with regression line and regression equation ggplot(data=df, aes (x=x, y=y)) + geom_smooth(method=" lm ") + geom_point() + stat_regline_equation(label. x =30, label. y =310)
Ini memberitahu kita bahwa persamaan regresi yang sesuai adalah:
kamu = 2,6 + 4*(x)
Perhatikan bahwa label.x dan label.y menentukan koordinat (x,y) persamaan regresi yang akan ditampilkan.
Langkah 3: Tambahkan R-square ke plot (opsional)
Anda juga dapat menambahkan nilai R kuadrat dari model regresi jika Anda ingin menggunakan sintaks berikut:
#load necessary libraries library (ggplot2) library (ggpubr) #create plot with regression line, regression equation, and R-squared ggplot(data=df, aes (x=x, y=y)) + geom_smooth(method=" lm ") + geom_point() + stat_regline_equation(label. x =30, label. y =310) + stat_cor( aes (label=..rr.label..), label. x =30, label. y =290)
R-kuadrat untuk model ini ternyata 0,98 .
Anda dapat menemukan lebih banyak tutorial R di halaman ini .