问题描述
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 (将#修改为@)