मैं एक पौराणिक कथाओं में अल्फा और रंग को कैसे जोड़ सकता हूं

Question

मेरे पास एक स्टैक्ड बार ग्राफ है जहां रंग श्रेणी का प्रतिनिधित्व करते हैं और मैंने अल्फा को 2 में विभाजित करने के लिए समायोजित किया है। पौराणिक कथा अल्फा (ग्रे के रंगों में) दिखाती है और कलर्स। हालांकि मैं एक किंवदंती बनाना चाहता हूं जिसमें संयोजन शामिल हैं।

उन्हें गठबंधन करने के लिए मैंने this question पर देखा है लेकिन मैं अल्फा को जोड़ नहीं सकता और भर सकता हूं।

mtcars %>% 
ggplot(aes(gear, mpg, fill = as.factor(vs), alpha = as.factor(am)))+ 
geom_bar(stat = "identity")+ 
scale_fill_manual(name = "legend", 
        values = c(
         "0" = "red", 
         "1" = "blue", 
         "0"="red", 
         "1"="blue" 
        ), 
        labels = c("V-engine, automatic", 
          "V-engine, manual", 
          "Straight-engine, automatic", 
          "Straight-engine, manual") 
       )+ 
scale_alpha_manual(name = "legend", 
        values = c(
         "0" = 1, 
         "1"=2/5, 
         "0"=1, 
         "1"=2/5 
         ), 
        labels = c(
         "V-engine, automatic", 
         "V-engine, manual", 
         "Straight-engine, automatic", 
         "Straight-engine, manual" 
         ) ) 

Answer 1

मैं आपके सवाल का aes(alpha) का उपयोग नहीं लेकिन vs और am के संयोजन के साथ alphafill.colour के रूप में इलाज से संपर्क किया: यहाँ एक प्रतिलिपि प्रस्तुत करने योग्य आंकड़ा वह काम नहीं करता है।

mtcars %>% 
    ggplot(aes(gear, mpg, fill = interaction(as.factor(vs), as.factor(am)))) + 
    geom_bar(stat = "identity") + 
    scale_fill_manual(name = "legend", 
         values = c(
          "0.0" = alpha("red", 1), 
          "1.0" = alpha("blue", 1), 
          "0.1" = alpha("red", 2/5), 
          "1.1" = alpha("blue", 2/5) 
         ), 
         labels = c("V-engine, automatic", 
           "V-engine, manual", 
           "Straight-engine, automatic", 
           "Straight-engine, manual") 
        )