ggplot

Question

library(ggplot2) 
p <- ggplot(mtcars, aes(wt, mpg)) 
p + geom_point(size=4) 

के साथ अलग-अलग रंगों को कैसे निर्दिष्ट करें मान लीजिए कि आपके ऊपर scatterplot है। आप कैसे निर्दिष्ट कर सकते हैं कि >= 25 mpg अंक red, एक between 20 and 25green और 0-20blue प्लॉट किए जाएंगे?

क्या यह ggplot विशेष रूप से किया जा सकता है?

Answer 1

में name = .. तर्क करने के लिए इसे पारित कर सकते हैं चरण:

सबसे पहले, आप उन समूहों को परिभाषित करते हैं जिनमें अलग-अलग रंग हो सकते हैं; या तो डेटा फ्रेम में या aes के अंदर एक और कॉलम जोड़कर। दूसरी बात यह है

aes(wt, mpg, color = cut(mpg, breaks = c(0, 20, 25, Inf))) 

, एक मैनुअल रंग निर्दिष्ट करने के द्वारा या पैमाने को भरने:: मैं aes यहां इस्तेमाल करेंगे

scale_color_manual(values = c('blue', 'green', 'red'), 
        limits = c('(0,20]', '(20,25]', '(25,Inf]')) 

यह निर्दिष्ट करता है जो रंग (values) का उपयोग करने के लिए और उन्हें करने के लिए आवंटित करने के लिए लेबल जो (limits); ये cut द्वारा उत्पन्न समूह के नाम हैं।

एक साथ लिया गया:

ggplot(mtcars) + 
    aes(wt, mpg, color = cut(mpg, breaks = c(0, 20, 25, Inf))) + 
    geom_point(size = 4) + 
    scale_color_manual(values = c('blue', 'green', 'red'), 
         limits = c('(0,20]', '(20,25]', '(25,Inf]')) 

आप अपने डेटा को एक अलग कॉलम के रूप में समूह जोड़कर कथा शीर्षक सुधार कर सकते हैं, या एक guides समारोह कॉल प्रदान करके:

guides(color = guide_legend(title = 'mpg range')) 

Answer 2

निश्चित रूप से यह हो सकता है, हालांकि इस प्रकार का काम शायद ggplot() से पहले अपने डेटा फ्रेम के साथ काम करने के लिए सबसे उपयुक्त है। आप इस तरह ifelse() इस्तेमाल कर सकते हैं:

library(ggplot2) 
p <- ggplot(mtcars, aes(wt, mpg)) 
library(ggplot2) 
p <- ggplot(mtcars, aes(wt, mpg)) 
p + geom_point(size=4, aes(color = ifelse(mpg > 25, ">25", 
            ifelse(mpg > 20, "<20", "20-25")))) + 
    scale_color_manual(values = c(">25" = "red", "<20" = "blue", "20-25" = "green"), 
         name = "MPG") 

आप आप दो में ऐसा एक शीर्षक बनाने के लिए guides() कॉल करने के लिए की जरूरत नहीं है तुम scale_color_manual()