在执行代码时，boxplots会被删除

Question

我使用以下代码在单个图表中生成4个箱图，其中包括重新排列和着色每个箱图：

boxplot(glucose~treatments,data=F1FG,xlab="Treatment diets",ylab="Glucose(mg/dL)",main="F1")

F1FG$treatments<-ordered(F1FG$treatments,levels=c("NM","LM","CM","HM"))

order<-as.factor(rep(c(3,4,2,1),each=33))

F1FG<-cbind(F1FG,order)

colours=c(rep("orange",1),rep("pink",1),rep("white",1),rep("blue",1))

boxplot(glucose~treatments,data=F1FG,xlab="Treatment diets",ylab="Glucose(mg/dL)",main="F1",col=colours)

我一直在使用这些命令并且它们完美地工作。突然间，当我到达最后一行代码时，带有框图的图表在执行时刚刚从屏幕上删除。我的代码是否有问题，或者导入文件有什么问题？