كيفية عرض النسب المئوية على الرسم البياني في ggplot2

يمكنك استخدام بناء الجملة الأساسي التالي لعرض النسب المئوية على المحور y للرسم البياني في ggplot2:

 library (ggplot2)
library (scales)

#create histogram with percentages
ggplot(data, aes (x = factor (team))) +  
  geom_bar( aes (y = (..count..)/ sum (..count..))) +
  scale_y_continuous(labels=percent)

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

مثال 1: الرسم البياني الأساسي مع النسب المئوية

يوضح التعليمة البرمجية التالية كيفية إنشاء رسم بياني للمتغيرات الفئوية مع النسب المئوية المعروضة على المحور Y:

 library (ggplot2)
library (scales)

#define data frame
data <- data. frame (team = c('A', 'A', 'A', 'A', 'B', 'B', 'B', 'C', 'C', 'C', 'C') ,
                   points = c(77, 79, 93, 85, 89, 99, 90, 80, 68, 91, 92))

#create histogram with percentages
ggplot(data, aes (x = factor (team))) +  
  geom_bar( aes (y = (..count..)/ sum (..count..))) +
  scale_y_continuous(labels=percent) 

مثال 2: الرسم البياني مع النسب المئوية (إزالة الكسور العشرية)

يمكنك أيضًا استخدام وسيطة الدقة لعرض الأعداد الصحيحة فقط كنسب مئوية على المحور ص:

 library (ggplot2)
library (scales)

#define data frame
data <- data. frame (team = c('A', 'A', 'A', 'A', 'B', 'B', 'B', 'C', 'C', 'C', 'C') ,
                   points = c(77, 79, 93, 85, 89, 99, 90, 80, 68, 91, 92))

#create histogram with percentages
ggplot(data, aes (x = factor (team))) +  
  geom_bar( aes (y = (..count..)/ sum (..count..))) +
  scale_y_continuous(labels = scales :: percent_format(accuracy = 1L )) 

مثال 3: رسم بياني مخصص مع النسب المئوية

يوضح التعليمة البرمجية التالية كيفية إنشاء رسم بياني مع النسب المئوية المعروضة على المحور Y وعنوان مخصص وتسميات المحاور والألوان:

 library (ggplot2)
library (scales)

#define data frame
data <- data. frame (team = c('A', 'A', 'A', 'A', 'B', 'B', 'B', 'C', 'C', 'C', 'C') ,
                   points = c(77, 79, 93, 85, 89, 99, 90, 80, 68, 91, 92))

#create histogram with percentages and custom aesthetics
ggplot(data, aes (x = factor (team))) +  
  geom_bar( aes (y = (..count..)/ sum (..count..)), fill = ' lightblue ') +
  scale_y_continuous(labels=percent) +
  labs(title = ' Breakdown by Team ', x = ' Team ', y = ' Percent of Total ') +
  theme_minimal()

ذات صلة: دليل كامل لأفضل سمات ggplot2

مصادر إضافية

تشرح البرامج التعليمية التالية كيفية إجراء عمليات شائعة أخرى باستخدام الرسوم البيانية في R:

كيفية تغيير عدد الصناديق في الرسم البياني في R
كيفية رسم رسوم بيانية متعددة في R
كيفية إنشاء رسم بياني للتردد النسبي في R