У меня есть 4 объекта ggplot с довольно большим количеством элементов, поэтому загрузка отдельных графиков занимает много времени, но они заканчивают добавлять все элементы, когда я загружаю их по отдельности.
Я хочу, чтобы все 4 графика были на одном графике, что я делаю, используя grid.arrange
Когда я запускаю каждый элемент по отдельности (сохраняя графики, а затем запускаю только строку grid.arrange(), график отображается должным образом. Однако, когда я запускаю свой полный скрипт с помощью ctrl + alt + R, я получаю только первый график, бит второго сюжета.
Можно ли увеличить ограничение по времени, чтобы сценарий смог завершить создание сюжета?
data<- data.frame(c(1,2,3),c(4,5,6))
plot1 <- plot2 <- plot3 <- plot4 <- data %>%
ggplot(aes(x = .[,1], y = .[,2])) +
geom_text_repel(label = rownames(data)) +
geom_point(color = "blue") +
theme_bw() +
ggtitle("data title") +
labs(x = "xlabel", y = "ylabel") +
geom_vline(xintercept = 0)+
geom_hline(yintercept = 0)
grid.arrange(plot1, plot2, plot3, plot4, ncol = 2)
a<- menu(c("yes","no"), title="Make a choice")