Используйте cowplot в R, чтобы выровнять графики image ()

Question

Я хотел бы выровнять два графика в R, сгенерированных с помощью функции image().

Пример кода:

# Load package
library(cowplot)

# Plot sample image
image <- image(matrix(rnorm(1000), 100,100))

# Align plots
plot_grid(image, image)

Однако, когда я делаю это так, графики не появляются.Я что-то пропустил?Или коровья плоть не может обрабатывать графики, сгенерированные из функции изображения?

Answer 1

Если вы хотите использовать cowplot для графиков base-R, я настоятельно рекомендую использовать текущую версию разработки cowplot.В этой версии вы можете просто превратить свой код изображения в формулу (добавив ~ впереди), и он будет работать.

library(cowplot)
#> 
#> 
#> *******************************************************
#> Note: cowplot does not change the default ggplot2 theme
#> anymore. To recover the previous behavior, execute:
#>   theme_set(theme_cowplot())
#> *******************************************************

# Plot sample image
image <- ~image(matrix(rnorm(1000), 100,100))

# Align plots
plot_grid(image, image)

^{Созданна 2018-10-27 представьте пакет (v0.2.1)}

Answer 2

Вам нужно проделать небольшую работу, чтобы сохранить их в вашей среде.Если вы отметите image, вы увидите, что это NULL.Так что вам придется записать его, а затем построить его.

p <- recordPlot()
plot.new()
image(matrix(rnorm(1000), 100,100))
p

plot_grid(p, p, nrow = 2)