Question

我正在尝试绘制不同的预测因子与中风和潜在表型（即胆固醇）的关系。在我的数据中，我最初具有有效的ggplot代码，其中形状表示不同的变量（中风，HDL胆固醇和总胆固醇），颜色表示类型（即疾病（中风）或表型（HDL /总胆固醇）。，我想在周围交换形状和颜色，但是现在，我遇到了位置闪避以及geom_point和geom_error对齐的问题

stroke_graph <- ggplot(stroke,aes(y=as.numeric(stroke$test), 
                                  x=Clock, 
                                  shape = Type, 
                                  colour = Variable)) + 
  geom_point(data=stroke, aes(shape=Type, colour=Variable), show.legend=TRUE, 
              position=position_dodge(width=0.5), size = 3) +
  geom_errorbar(aes(ymin = as.numeric(stroke$LCI), ymax= as.numeric(stroke$UCI)),
                position = position_dodge(0.5), width = 0.05,
                colour  ="black")+
  ylab("standardised beta/log odds")+ xlab ("")+
  geom_hline(yintercept = 0, linetype = "dotted")+
  theme(axis.text.x = element_text(size = 10, vjust = 0.5), legend.position = "none",
        plot.title = element_text(size = 12))+
  scale_y_continuous(limit = c(-0.402, 0.7))+ scale_shape_manual(values=c(15, 17, 18))+
  theme(legend.position="right") + labs(shape = "Variable") + guides(shape = guide_legend(reverse=TRUE)) + 
  coord_flip() 
stroke_graph + ggtitle("Stroke and Associated Phenotypes") + theme(plot.title = element_text(hjust = 0.5))

现在显示图形：1 以前可以工作的图形-仅有的代码差异是交换“类型”和“变量”：2

geom_point和geom_errorbar对齐的问题

0 个答案: