Мне нужно устроить несколько графиков для фигуры. Я создаю отдельные сюжеты, используя базовую и сетчатую графику. Чтобы упорядочить их на одном рисунке, я использовал grid.echo()
, grid.grab(
), чтобы преобразовать в grobs, а затем arrangeGrob()
и grid.arrange()
, чтобы построить окончательную цифру. Несколько недель назад моя пробная фигура работала нормально, но теперь, когда я повторно запускаю код, она создает фигуру с пробелами на полях участков.Пространство, сгенерированное в grid.arrange
добавить минимальный пример, который показывает проблему, которую я обращенную ...
##minimal example
library(grid)
library(gridExtra)
library(gridGraphics)
##test plot
plot_n1<-plot(1:10,1:10, asp=1)
##convert test plot to grob
grid.echo()
test_p<-grid.grab()
##simulate several plots arranged in a more complex layout
multi<-arrangeGrob(test_p, test_p, test_p, test_p, ncol=1, heights=c(1/4,1/4,1/4,1/4))
##create graph
png(filename="minimal_multiplot.png", res=300, width=20, height=20, units="cm")
grid.arrange(test_p, multi, ncol=2, widths=c(2/3,1/3))
dev.off()
Что я делаю неправильно?
Пожалуйста, вы можете редактировать в пакеты, которые вы должны запустить этот пример (я работал его, но не смог найти решение). Установка 'clip = 'на' 'в' organizeGrob' делает его немного лучше. –
Большое спасибо Ричарду! Отлично работал с моим кодом! :)) –
'grid.echo()/grid.grab()' являются относительно новыми дополнениями, и из того, что я могу сказать, все еще нестабильно. Я не думаю, что многое может быть сделано на стороне gridExtra, кроме таких обходных решений. – baptiste