Основной заголовок в grid.arrange или rangeGrob имеет серый фон

Question

Я переключаюсь с ggplot2 1.0.1 а также gridExtra 0.9.1 до новейших версий этих пакетов и бороться с некоторыми незначительными проблемами на данный момент.

Одной из проблем является заголовок в комбинированном сюжете.

library(ggplot2)
library(gridExtra)
df <- data.frame(x=runif(100), y=runif(100))
p1 <- ggplot(df, aes(x,y)) + geom_point()
p2 <- ggplot(df, aes(x,y)) + geom_point()
a <- arrangeGrob(p1,p1,p2, layout_matrix=rbind(c(1,2),c(1,3)), top='my title')
plot(a)
ggsave('a.pdf', a)

в старой версии параметр назывался main и мне пришлось использовать print построить мою графику a, Теперь, когда я сохраняю график, все в порядке. Но plot(a) график имеет светло-серый фон сетки позади my title, В сохраненном файле PDF фон снова белый.

Я также пытался использовать grid.arrange но я не хочу печатать сюжет непосредственно при выполнении. Вот почему я использую двухэтапный подход, сохраняя график в переменной, а затем plot Это.

Итак, как мне получить белый фон, когда plot(a)?

Answer 1

Использование grid.draw, plot Метод только для тестирования.

library(grid)
grid.newpage() 
grid.draw(a)