كيفية إضافة خط أفقي إلى المؤامرة والأسطورة في ggplot2

يمكنك استخدام بناء الجملة التالي لإضافة خط أفقي إلى قطعة أرض في ggplot2، ثم إضافة الخط الأفقي أيضًا كعنصر في وسيلة الإيضاح:

 library (ggplot2)

#create data frame with values to plot
df <- data. frame (team=rep(c(' A ', ' B '), each= 5 ),
                 assists=c(1, 3, 3, 4, 5, 7, 7, 9, 9, 10),
                 points=c(4, 8, 12, 10, 18, 25, 20, 28, 33, 35))

#create data frame that contains horizontal line location
cutoff <- data. frame (yintercept= 22 , Lines=' Cutoff ')

#create scatterplot with horizontal line and include horizontal line in legend
ggplot(df, aes(x=assists, y=points)) + 
  geom_point(aes(color=team)) +
  geom_hline(aes(yintercept=yintercept, linetype=Lines), cutoff)

من خلال إنشاء إطار بيانات منفصل يحتوي فقط على قيمة تقاطع y للخط الأفقي، يمكننا إضافة الخط الأفقي إلى المخطط وإضافته تلقائيًا إلى وسيلة الإيضاح.

يوضح المثال التالي كيفية استخدام بناء الجملة هذا عمليًا.

مثال: أضف خطًا أفقيًا إلى الحبكة والأسطورة في ggplot2

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

 #create data frame
df <- data. frame (team=rep(c(' A ', ' B '), each= 5 ),
                 assists=c(1, 3, 3, 4, 5, 7, 7, 9, 9, 10),
                 points=c(4, 8, 12, 10, 18, 25, 20, 28, 33, 35))

#view data frame
df

   team assists points
1 To 1 4
2 to 3 8
3 to 3 12
4 to 4 10
5 to 5 18
6 B 7 25
7 B 7 20
8 B 9 28
9 B 9 33
10 B 10 35

لنفترض أننا نريد إنشاء مخطط تشتت في ggplot2 لتصور النقطة وقيم المساعدة لكل لاعب بناءً على فريقه، ثم أضف خطًا أفقيًا عند y = 22 لتحديد “عتبة” للفرق بين الجيد والسيئ اللاعبين.

يمكننا استخدام بناء الجملة التالي للقيام بذلك:

 library (ggplot2)

#create data frame that contains horizontal line location
cutoff <- data. frame (yintercept= 22 , Lines=' Cutoff ')

#create scatterplot with horizontal line and include horizontal line in legend
ggplot(df, aes(x=assists, y=points)) + 
  geom_point(aes(color=team)) +
  geom_hline(aes(yintercept=yintercept, linetype=Lines), cutoff) 

لاحظ أن وسيلة الإيضاح الموجودة على يمين قطعة الأرض تحتوي على دوائر تشير إلى النقاط الموجودة على قطعة الأرض التي تنتمي إليها الفرق، كما تمت إضافة خط أفقي إلى وسيلة الإيضاح لتمثيل خط القطع.

إذا كنت تريد تغيير التسمية التوضيحية للخط الأفقي في وسيلة الإيضاح، فما عليك سوى تحرير النص الموجود في عمود الصفوف في إطار البيانات الفاصلة .

على سبيل المثال، يمكننا استخدام الصيغة التالية لتغيير تسمية الخط الأفقي إلى “عتبة الخير مقابل عتبة الشر”:

 library (ggplot2)

#create data frame that contains horizontal line location
cutoff <- data. frame (yintercept= 22 , Lines=' Cutoff of Good vs. Bad ')

#create scatterplot with horizontal line and include horizontal line in legend
ggplot(df, aes(x=assists, y=points)) + 
  geom_point(aes(color=team)) +
  geom_hline(aes(yintercept=yintercept, linetype=Lines), cutoff) 

لاحظ أن تسمية الخط الأفقي في وسيلة الإيضاح قد تغيرت.

مصادر إضافية

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

كيفية تغيير عنوان الأسطورة في ggplot2
كيفية تغيير حجم الأسطورة في ggplot2
كيفية تغيير موضع الأسطورة في ggplot2