ggforce facet_wrap_paginate的图数与nrow和ncol不匹配

问题描述

facet_wrap_paginate函数有问题:我有几组图表。每个组中图的数量各不相同。当我使用facet_wrap_paginate将5x4图表中的每个组绘制到一个pdf上时,如果最后一个pdf页面的绘图太少,则会出现错误,因此第一行的绘图不会“填充”。

例如一组图包含22个图,因此第一页上有20个图,第二页上只有2个图,这会导致错误

错误:无法创建零长度单位向量(“ unit”子设置)

这是示例代码

for (i in Classes)
{
  x <- filter(all_data_R2_filtered,class.x== "i" )
  
  bp <- ggplot(data = x,aes(x=dil,y=mmol,color=AcquiMeth))+
    geom_point()+
    facet_wrap_paginate(name.x ~ .,ncol = 5,nrow = 4,scales = "free")
    number_of_pages <- n_pages(bp)
  
  pdf(paste("class",i,".pdf",sep = ""),paper= 'A4r',w= 297,h= 210)
  
  for(j in 1:number_of_pages){
    print(bp + facet_wrap_paginate(name.x ~ .,page = j))
    }
  dev.off()
}

有没有解决办法?在此先感谢您的帮助

解决方法

暂无找到可以解决该程序问题的有效方法,小编努力寻找整理中!

如果你已经找到好的解决方法,欢迎将解决方案带上本链接一起发送给小编。

小编邮箱:dio#foxmail.com (将#修改为@)