كيفية إضافة معادلة الانحدار إلى قطعة أرض في r

في كثير من الأحيان قد ترغب في إضافة معادلة الانحدار إلى قطعة أرض في R على النحو التالي:

ولحسن الحظ، من السهل جدًا القيام بذلك باستخدام الوظائف الموجودة في حزمتي ggplot2 و ggpubr .

يوفر هذا البرنامج التعليمي مثالاً خطوة بخطوة حول كيفية استخدام الوظائف في هذه الحزم لإضافة معادلة انحدار إلى مخطط في R.

الخطوة 1: إنشاء البيانات

أولاً، لنقم بإنشاء بعض البيانات المزيفة للعمل معها:

 #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

الخطوة 2: إنشاء المؤامرة مع معادلة الانحدار

بعد ذلك، سوف نستخدم الصيغة التالية لإنشاء مخطط مبعثر مع خط انحدار ومعادلة ملائمة:

 #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) 

يخبرنا هذا أن معادلة الانحدار المجهزة هي:

ص = 2.6 + 4*(س)

لاحظ أن label.x و label.y يحددان إحداثيات (x,y) لمعادلة الانحدار المراد عرضها.

الخطوة 3: إضافة مربع R إلى قطعة الأرض (اختياري)

يمكنك أيضًا إضافة القيمة المربعة R لنموذج الانحدار إذا كنت تريد استخدام بناء الجملة التالي:

 #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 لهذا النموذج هو 0.98 .

يمكنك العثور على المزيد من دروس R على هذه الصفحة .