组合绘图类型时排序x轴

Question

我正在使用ggplot组合一个箱线图和一个点图，并希望订购x轴，以便箱图彼此相邻。

将因素重新排序为所需的顺序不会对数据ggplot调用fortify起作用，并在我将数据传递到geom_boxplot或geom_point时删除未使用的因素。

这是一个例子。

set.seed(100)
x<-factor(rep(LETTERS[1:3],5)) 
y<-runif(15,0,10) 

data<-data.frame(x=x,y=y) 

data$x <- factor(data$x,levels=c("A","C","B"))

library(ggplot2)
ggplot(data,aes(x,y))+
        geom_boxplot(data=data[data$x %in% c("A","C"),])+
        geom_point(data=data[data$x=="B",])

所需的输出是彼此相邻的A和C箱图，然后是B点图。

Answer 1

您需要scale_x_discrete()：

library(ggplot2)
ggplot(data,aes(x,y))+
  geom_boxplot(data=data[data$x %in% c("A","C"),])+
  geom_point(data=data[data$x=="B",]) +
  scale_x_discrete(limit = c("A", "C", "B"))