ج: كيفية رسم الدوائر في المسارات: مع أمثلة

يمكنك استخدام الطرق التالية لرسم دائرة في مسار في R:

الطريقة الأولى: رسم دائرة باستخدام القاعدة R

 library (plotrix)

#create scatterplot
plot(x, y)

#add circle at specific (x, y) coordinates with specific radius
draw.draw. circle (x=3, y=8, radius=.5)

الطريقة الثانية: رسم دائرة باستخدام ggplot2

 library (ggplot2)
library (ggforce)

#create scatter plot with circle at specific location with specific radius
ggplot(data = df, aes(x, y)) +
  geom_point() +
  geom_circle(aes(x0=3, y0=8, r=1), inherit. aes = FALSE ) +
  coordinate_fixed()

توضح الأمثلة التالية كيفية استخدام كل طريقة عمليًا.

مثال 1: رسم دائرة باستخدام القاعدة R

لرسم دائرة على مخطط R الأساسي، يجب عليك أولاً تثبيت وتحميل حزمة plotrix :

 install. packages (' plotrix ')
library (plotrix)

بعد ذلك، يمكننا استخدام الدالة draw.circle() ‎ من حزمة plotrix لإضافة دائرة إلى سحابة نقطة R الأساسية:

 #create data frame
df <- data. frame (x=c(1, 2, 2, 3, 3, 4, 8),
                 y=c(2, 4, 5, 4, 7, 9, 10))

#create scatterplot
plot(df$x, df$y)

#add circle
draw.draw. circle (x=3, y=8, radius=.5) 

يمكنك أيضًا استخدام الدالة draw.circle() عدة مرات لرسم دوائر متعددة على نفس المسار:

 #create data frame
df <- data. frame (x=c(1, 2, 2, 3, 3, 4, 8),
                 y=c(2, 4, 5, 4, 7, 9, 10))

#create scatterplot
plot(df$x, df$y)

#add multiple circles to plot
draw.draw. circle (x=3, y=8, radius=.5)
draw.draw. circle (x=4, y=5, radius=.5, border=' red ', col=' lightblue ', lwd=5, lty=' dashed ')

لاحظ أنه تمت إضافة عدة دوائر إلى المخطط عند الإحداثيات (x، y) التي حددناها.

مثال 2: رسم دائرة باستخدام ggplot2

لرسم دائرة على قطعة أرض في ggplot2، يجب عليك أولاً تثبيت وتحميل حزمتي ggplot2 و ggforce :

 install. packages (' ggplot2 ')
install. packages (' ggforce ')
library (ggplot2)
library (ggforce)

بعد ذلك، يمكننا استخدام الدالة Geom_circle() ‎ من حزمة ggforce لإضافة دائرة إلى مخطط التشتت في ggplot2:

 #create data frame
df <- data. frame (x=c(1, 2, 2, 3, 3, 4, 8),
                 y=c(2, 4, 5, 4, 7, 9, 10))

#create scatter plot with circle
ggplot(data = df, aes(x, y)) +
  geom_point() +
  geom_circle(aes(x0=3, y0=8, r=1), linetype=' dashed ', color=' red ',
              fill=' lightblue ', lwd=1.5, inherit. aes = FALSE ) +
  coordinate_fixed() 

يتم وضع الدائرة عند الإحداثيات الدقيقة (x، y) التي حددناها.

ملاحظة : إذا لم تستخدم الوسيطة coord_fixed() ، فقد تظهر الدائرة على شكل قطع ناقص.

مصادر إضافية

تشرح البرامج التعليمية التالية كيفية تنفيذ المهام الشائعة الأخرى في R:

كيفية إنشاء مخطط مبعثر في R مع متغيرات متعددة
كيفية تسمية النقاط على مخطط التشتت في R
كيفية إضافة معادلة الانحدار إلى قطعة أرض في R