Я просто хочу добавить фрагмент текста внутри области построения pheatmap.
Поскольку функция pheatmap уже оборачивает все внутри нее, мне трудно разобраться в этом.
В MWE ниже, я просто хочу добавить long_text под графиком или, предпочтительно, в пустой нижний правый угол (соответственно, корректируя площадь графика, с помощью соответствующих разрывов строк и, если возможно, курсивом).
Если это слишком сложно, добавление текста в качестве подзаголовка в меньшем размере (курсив, если это возможно) также будет работать ...
mymat <- matrix(rexp(600, rate=.1), ncol=15)
colnames(mymat) <- paste("sample_", 1:15)
rownames(mymat) <- paste("gene", 1:dim(mymat)[1], sep="_")
pheatmap::pheatmap(mat = mymat,
border_color = NA,
main = "title here",
filename = "test.pdf"
)
long_text <- "I want to place this text in the bottom right corner, with the appropriate line breaks"
