Hello everyone ,
I have imported the image below and I would like to combine with some heatmap and ggplot2 plots .
But got errors while combing the image with other plots
May I get your help please
my_image <- magick::image_read("Capture.PNG")
library(pheatmap)
test <- matrix(rnorm(200), 20, 10)
mfs <- pheatmap(test)
library(ggplot2)
library(dplyr)
plot_LM <- test %>% as.data.frame() %>%
ggplot(aes(x=V1, y=V2)) +
geom_point(color="blue") +
geom_smooth(method=lm, se=FALSE, fullrange=TRUE,
linetype="dashed",
color="darkred", fill="blue")
gridExtra::grid.arrange(grobs=list(mfs$gtable, plot_LM, my_image ),
ncol= 3, labels=LETTERS[1:3])
Best,
Amare
