我已经看到了这个问题的所有答案，我以为我已经解决了这个问题，但是有些问题没有解决。我的数据超过1500行，看起来像这样

我的代码是

library(ggplot2)
dat <- read.table("C:/Projects/....txt",sep="\t",header=TRUE)
df<-data.frame(dat)
ggplot(df)+
  df$scenario_f = factor(df$scenario,levels=c('Baseline','10% Increase','20% Increase','30% Increase','200-200-200','10% + 200-200-200','20% + 200-200-200','30% + 200-200-200','100-200-200','10% + 100-200-200','20% + 100-200-200','30% + 100-200-200'),ordered=TRUE)+
  geom_histogram(aes(x=points),position="identity",colour="darkseagreen4",alpha=0.3,bins = 40) +
  facet_wrap(.~scenario_f)+
  scale_x_continuous(breaks =(seq(0,1200,by = 200)))  +
  scale_y_continuous(labels=comma)  +
  labs(x="Points",y="Number of Members")+
  theme(axis.title.y = element_text(size="12"),axis.title.x = element_text(size="12"),axis.text.x=element_text(size=10),axis.text.y=element_text(size=10))

如果我删除声明

  df$scenario_f = factor(df$scenario,ordered=TRUE)+

我的情节看起来像这样

但是构面的顺序不正确。它应该是在factor语句中指定的，并且出现以下无法理解的错误：

  

因子错误（df $情况，级别= c（“基线”，“增加10％”，“增加20％” 、：     二进制运算符的非数字参数   另外：警告消息：   

的不兼容方法（“ Ops.ordered”，“ +。gg”）