मैंने इस पर एक खरगोश के छेद से दूसरे में थोड़ा समय बिताया है। मैं इस डेटा को प्लॉट करना चाहता हूं।


df <- data.frame(value = c(80,75,50,60,5,91,68,50,40,50),
                 event = c("a","b","c","d","e","a","b","c","d","e"), cell = c("A","A","A","A","A","B","B","B","B","B"))


यह उतना ही करीब है जितना मैं उस प्लॉट के करीब पहुंच गया हूं जो मैं चाहूंगा:

lines <- data.frame(intercepts = c("b","d"), names = c('treatment1','treatment2'))

ggplot(df, aes(x=event , y=value, group = cell, color =cell)) + 
  geom_line(aes(linetype=cell), size =1) +
  geom_point(aes(shape=cell), size = 2) +
  theme(panel.grid = element_blank(), 
        legend.key = element_rect(fill="white"),
        legend.title = element_blank(),
        panel.background = element_blank())+
  geom_vline(data = lines, aes(xintercept = intercepts, color = names, linetype = names)) +
  scale_color_manual(values = c("A" = "red", "B" = "blue", "treatment1" = "green", "treatment2" = "purple")) +
  scale_linetype_manual(values = c("A" = "solid", "B" = "solid", "treatment1" = "dashed","treatment2"="dashed")) +
  scale_shape_manual(values = c("A" = 18, "B" = 20, "treatment1" = 1, "treatment2"= 1)) 

Ggplot

एकमात्र मुद्दा यह है कि किंवदंती कथानक की रेखाओं की तरह नहीं दिखती है। ए और बी इस तरह दिखना चाहिए यहां छवि विवरण दर्ज करें किंवदंती में, जबकि उपचार 1 और उपचार 2 लंबवत, धराशायी और उनके संबंधित रंगों का होना चाहिए।

2
pabstack 27 सितंबर 2021, 05:28

1 उत्तर

सबसे बढ़िया उत्तर

मुझे यकीन नहीं है, लेकिन कृपया इसे देखें। कृपया मुझे बताएं कि क्या B के लिए लाइनटाइप को ठोस या आदि की आवश्यकता है।

ggplot(df, aes(x=event , y=value, group = cell, color =cell)) + 
  geom_line(aes(linetype=cell), size =1) +
  geom_point(aes(shape=cell), size = 2) +
  theme(panel.grid = element_blank(), 
        legend.key = element_rect(fill="white"),
        legend.title = element_blank(),
        panel.background = element_blank())+
  geom_vline(data = lines, aes(xintercept = intercepts, color = names, linetype = names), show.legend = F) +
  scale_color_manual(values = c("A" = "red", "B" = "blue", "treatment1" = "green", "treatment2" = "purple"),
                     guide = guide_legend(override.aes = list(
                       linetype = c(1,3,3,3), #HERE
                       shape = c(19, 17, NA, NA)
                     ))) +
  guides(shape = "none", linetype = "none")

enter image description here

3
Park 27 सितंबर 2021, 06:01
समस्या अभी भी यह है कि किंवदंती वास्तव में लाइनों से मेल नहीं खाती है। ए बी में क्रमशः उनकी किंवदंतियों के हिस्से के रूप में ठोस और धराशायी रेखाएं होनी चाहिए। उपचार 1 और उपचार 2 में उनकी किंवदंतियों के हिस्से के रूप में क्षैतिज रेखाएं नहीं होनी चाहिए। मैं सोच रहा हूं कि क्या अन्य भूगर्भों में से एक उन मुद्दों को किंवदंती में जोड़ रहा है। मैं अब एक सौंदर्यशास्त्र की तलाश कर रहा हूं जो कि पौराणिक कथाओं में दिखने से भूगर्भ को बंद कर देता है।
 – 
pabstack
27 सितंबर 2021, 05:56
1
आह दोनों treatment1 और treatment2 में डैश्ड लाइन नहीं होनी चाहिए। इसे सुलझाया जा सकता है। कृपया प्रतीक्षा करें।
 – 
Park
27 सितंबर 2021, 05:59
1
मैं अपना कोड संपादित करता हूं। ऊपर दिए गए कोड में, आप treatment के लिए #HERE लाइन के scale_color_manual भाग में लाइनटाइप पा सकते हैं।
 – 
Park
27 सितंबर 2021, 06:02
1
अरे यह मिल गया! धन्यवाद! उस रात मैं वास्तव में अपनी रस्सी के अंत में था। मैं मदद की सराहना करता हूं।
 – 
pabstack
28 सितंबर 2021, 02:23