ggplot2作图之箱线图加误差线

library(tidyverse)

theme_set(theme_test())
library(sciplot)
iris%>%gather(key=Measure,value="value",-Species)%>%
  ggplot(aes(x=Measure,y=value,color=Species))+
  geom_point(position = position_dodge(0.7))+
  geom_boxplot(position = position_dodge(0.7))+
  ylim(0,10)+
  labs(y="value")