Как нанести выровненный текст на несколько строк / колонок? - PullRequest
Новая
       42

Как нанести выровненный текст на несколько строк / колонок?

3 голосов
/ 06 июня 2019

Я создаю «страницу» через несколько строк и столбцов с выровненным текстом (слева / справа / сверху / снизу).Я хотел бы использовать функцию grid.arrange(), но не могу этого сделать.Я прочитал в старом посте, что функция grid_plot() выполняет свою работу.

Итак, мой код: 

# Libraries
library(ggplot2)
library(grid)
library(cowplot)

x <- unit(1:3/(3+1), "npc")
y <- unit(1:2/(2+1), "npc")
grid.grill(h=y, v=x, gp=gpar(col="grey"))

myPlot <- plot_grid(
  grid.text(label="Information:", x=x[1], y=y[2], just=c("left", "bottom"),  gp=gpar(fontface = "bold",  fontsize = 15, col = "black")),
  grid.text(label="Name:",        x=x[2], y=y[1], just=c("right", "bottom"), gp=gpar(fontface = "plain", fontsize = 13, col = "red")), 
  grid.text(label="John Doe ",    x=x[2], y=y[1], just=c("left", "bottom"),  gp=gpar(fontface = "plain", fontsize = 13, col = "blue"))
)

Результат отображения хороший: Aligned plot

Но если я сохраню график в файле pdf, результат не будет выровнен 

save_plot("myPlot.pdf", myPlot, nrow=3, ncol=2)

Результат будет НЕ ожидаемым No aligned plot

Мой вопрос: как я могу выровнятьтекст в pdf файле?

...