Как увеличить размер grid.arrange(tableGrob, ggplotGrob)

Недавно начал использовать grid/gridExtra и пытался понять, как увеличить размер grobs. Не уверен, почему, кажется, что на бумаге осталось много места на краю недвижимости. Как увеличить размер? Ниже приведен PDF-файл, созданный Knitr и Rmarkdown.

введите здесь описание изображения

---
title: "Untitled"
output: pdf_document
classoption: landscape
---


```{r, echo=FALSE}
library(gridExtra)
library(ggplot2)
a <- read.csv(text='"State","Abbreviation", "age"
"Alabama","AL", "7"
"Alaska","AK", "8"
"Arizona","AZ", "3"
"Arkansas","AR", "4"
"California","CA", "4"')

tbla <- tableGrob(a, )
tblb <- ggplotGrob(ggplot(cars, aes(dist, speed)) + geom_point() + geom_smooth(method=loess))
grid.arrange(tbla, tblb)
```

r gridextra
person user2103970    schedule 14.08.2015    source источник
comment
какой гроб вы хотите больше, стол или участок? Сама фигура ограничена параметрами вязания fig.width/fig.height, но неясно, какие поля вы хотите уменьшить.   -  person baptiste    schedule 14.08.2015
comment
Привет, Батист, я попытался настроить параметры вязания fig.width/fig.height, но размер изображения кажется примерно таким же, когда край изображения все еще находится очень далеко от края документа. Есть ли способ настроить размер изображения, например, как мы вставляем изображение в MS Powerpoint и увеличиваем его до края слайда PowerPoint? Это как-то связано с точкой зрения?   -  person user2103970    schedule 15.08.2015
comment
поля в pdf-документе больше связаны с вязанием / rmarkdown, но ваш вопрос все еще не очень четко определен. Что именно вы хотите? Цифры, которые касаются края страницы? Таблица, которая простирается так же, как и сюжет? Автономный рисунок или включенный в документ PDF? Я предполагаю, что вы можете настроить поля PDF, передав параметры макета в пакет геометрии через rmarkdown/pandoc.   -  person baptiste    schedule 15.08.2015
comment
Извините, я оставил вопрос внизу публикации. Эта область комментариев недостаточно велика, чтобы показать изображение.   -  person user2103970    schedule 15.08.2015
comment
Извините, я оставил вопрос внизу публикации. Эта область комментариев недостаточно велика, чтобы показать изображение. Да, я хочу максимально увеличить изображение ближе к краю, потому что изображение (таблицы и диаграммы) слишком маленькое, и поэтому очень трудно увидеть маленькие таблицы и диаграммы. Как растянуть край изображения близко к краю документа?   -  person user2103970    schedule 15.08.2015

Ответы (1)


arrow_upward
0
arrow_downward

Вы можете установить поля через rmarkdown, используя пакет геометрии

введите здесь описание изображения

---
title: "Untitled"
output:
  pdf_document:
    fig_width: 11
    fig_height: 7
    fig_crop: false
classoption: landscape
geometry: margin=0in
---


```{r, echo=FALSE}
library(gridExtra)
library(grid)
library(ggplot2)
a <- read.csv(text='"State","Abbreviation", "age"
"Alabama","AL", "7"
"Alaska","AK", "8"
"Arizona","AZ", "3"
"Arkansas","AR", "4"
"California","CA", "4"')

tbla <- tableGrob(a)
tblb <- ggplotGrob(ggplot(cars, aes(dist, speed)) + geom_point() + geom_smooth(method=loess))
grid.arrange(tbla, tblb, heights=unit.c(sum(tbla$heights), unit(1,"null")))
```
person baptiste    schedule 15.08.2015
comment
Это сработало! Мне нужно немного больше изучить пакет геометрии. Спасибо за совет. - person user2103970; 15.08.2015
comment
Кстати... геометрия: margin=0in работает с левым и правым полем, есть ли верхнее и нижнее поля? Кроме того, есть ли способ увеличить таблицу до того же размера, что и диаграмма внизу? - person user2103970; 15.08.2015
comment
вы можете установить ширину явно, tbla <- tableGrob(a, widths=unit(rep(1/ncol(a), ncol(a)),"npc")-unit(1,"line")) - person baptiste; 22.08.2015