ggplot2 एक बहुआयामी बार साजिश लेबलिंग

Question

मैं जो करना चाहता हूं वह निम्नलिखित उदाहरणों में geom_bar() दोनों को अपने संबंधित डेटा लेबल के साथ लेबल करना है। अब तक, मैं केवल दिखाने के लिए एक या अन्य प्राप्त कर सकते हैं:

dput():

x <- structure(list(variable = c("a", "b", "c"), f = c(0.98, 0.66, 
0.34), m = c(0.75760989010989, 0.24890977443609, 0.175125)), .Names = c("variable", 
"f", "m"), row.names = c(NA, 3L), class = "data.frame") 

ggplot(x, aes(variable, f, label=paste(f*100,"%", sep=""))) + 
geom_bar() + 
geom_text(size=3, hjust=1.3, colour="white") + 
geom_bar(aes(variable, m, label=paste(m*100,"%",sep="")), fill="purple") + 
coord_flip() 

देखें कि कैसे वहाँ एक डेटा लेबल है काला के अंदर। उसी साजिश में, मैं बैंगनी के अंदर एक ही चीज़ करना चाहता हूं।

Answer 1

कैसे आप के लिए यह काम करता है:

ggplot(x, aes(variable, f, label=paste(f*100,"%", sep=""))) + 
geom_bar() + 
geom_text(size=3, hjust=1.3, colour="white") + 
geom_bar(aes(variable, m, label=paste(m*100,"%",sep="")), fill="purple") + 
geom_text(aes(y=m,label=paste(round(m*100),"%",sep="")),size=3, hjust=1.3, colour="white") + 
coord_flip() 

Answer 2

आप एक अलग दृष्टिकोण पर विचार कर सकते।

यदि ग्राफ का मुख्य लक्ष्य सलाखों की लंबाई/स्थिति की तुलना करना है, तो बार में संख्याएं शामिल हैं, "अस्पष्ट" सलाखों को आंख/मस्तिष्क के लिए कठिन/उचित स्थिति का न्याय करने के लिए कठिन बनाना बार।

यदि मुख्य लक्ष्य संख्याओं की तुलना करना है, तो आपके पास जो खराब है, वह एक खराब रखी गई तालिका है (रंगीन पृष्ठभूमि के साथ), यदि वे ठीक से लाइन करते हैं तो संख्याओं की तुलना करना आसान है।

कुछ विकल्पों में एक अलग ग्राफ और टेबल (दोनों ठीक से रखे गए) शामिल होंगे, या संख्याओं के शीर्ष के बजाय संख्याओं को मार्जिन (सही ढंग से गठबंधन) में डालें, या सीमांत कोशिकाओं में बारप्लॉट के साथ एक टेबल बनाएं। आप बार प्लॉट की बजाय एक डॉट प्लॉट पर भी विचार करना चाह सकते हैं (ggplot2 अभी भी इसे आसानी से करना चाहिए), स्टैक्ड बार केवल पहली (बाएं) श्रेणी की उचित तुलना की अनुमति देते हैं और कुल, आपके उदाहरण में तुलना करना आसान नहीं है ऊपर और नीचे सलाखों के काले हिस्से के सापेक्ष आकार।