由于我要使用用于创建图的拟合的软件包,因此我必须使用gridExtra :: grid.arrange绘制除彼此以外的多个图。 我必须使用grid.arrange为图创建标题。 现在,我想将两者结合起来,但无法弄清楚如何做。所以:我想画出几个彼此并排的人物,并给每个人一个不同的标题。
我有euler1和euler2,适合于用euler图表示我的数据。 用于绘制除彼此之外的2个地块,此代码对我有用:
gridExtra::grid.arrange(plot(euler1),plot(euler2))
为单个图赋予标题,此代码对我有用:
plot1 <- plot(euler1)
grid.arrange(grobs = list(plot1), top = "Title 1")
现在,我想将两个代码结合起来。 我该怎么办?
我尝试例如(但不起作用)
plot1 <- plot(euler1)
plot2 <- plot(euler2)
gridExtra::grid.arrange(plot1, plot2, grobs = list(plot1, plot2), top = list("Title 1","Title 2"))
亲切的问候, 朱迪思
答案 0 :(得分:0)
通常,您会在情节本身中添加标题,如
p1 = ggplot() + ggtitle('plot 1')
p2 = ggplot() + ggtitle('plot 2')
grid.arrange(grobs = list(p1, p2), top = "Global Title", ncol=2)
但是,如果您更喜欢使用grid.arrange的top
参数作为标题,则可以嵌套它们,
p = ggplot()
grid.arrange(arrangeGrob(p, top = 'title 1'), arrangeGrob(p, top = 'title 2'), top = "Global Title", ncol=2)
答案 1 :(得分:0)
我想出了办法,因为e where inputArray.Contains(s.area)
&& s.sdate == _context.sales.Where(ss => ss.area == s.area).Max(ss => ss.sdate)
中main
的使用对于eulerr软件包是固定的。现在我可以使用:
plot
感谢大家的反馈。