ggplot2图形，带有由grid.arrange（）设置的图例

这是我的数据集：

> # my data --- copy and type  dd.RR <- read.table(file="clipboard")  to get it
> dd.RR 
        variance         vars
1 Op:Date:Sample 2.334140e-10
2    Date:Sample 0.000000e+00
3      Op:Sample 1.578744e-10
4        Op:Date 7.087561e-10
5         Sample 3.710173e-02
6             Op 5.429357e-01
7           Date 0.000000e+00
8         repeat 7.640778e-01

---

如果有这样的图例，请说明如何并排绘制两个ggplot2图形？（如果可能，使用grid.arrange（））

因为@baptiste不会将其注释转换为答案，所以我会：

---

使用更大的设备窗口（饼图具有固定的纵横比以保持圆形；当您将两个饼图并排放置时，它们变得非常小，但图例和标题保持了它们的大小并相互重叠）。例如，使用

dev.new（width=10）

使用更大的设备窗口（饼图具有固定的纵横比以保持圆形；当您将两个饼图并排放置时，它们变得非常小，但图例和标题保持了它们的大小并相互重叠）@baptiste谢谢；但是如何使用更大的设备窗口呢？<代码> DEV.NEW。（宽度＝10）< /代码>例如也考虑删除一个用于传说和共享相同的传说，或者可能是<代码> FAXETHORD 看起来像“代码>网格”。安排< /代码>是不必要的。@巴普蒂斯特，谢谢，它与<代码> DEV.NEW（）/<代码>一起工作。如果你愿意，把你的评论转换成答案，我接受。

gg <- ggplot(dd.RR, 
        aes(x = factor(""), fill = variance, weight=vars)) + 
        geom_bar(width = 1) + coord_polar(theta = "y") +
        labs(title="Reproductibilité et répétabilité") +
        scale_x_discrete("", breaks=NULL) + scale_y_continuous("", labels=NULL) 
gg

grid.arrange(gg,gg,ncol=2)