Подгоните Flextable к размеру слайда в PowerPoint с офицером

Я сделал флешку с различным форматированием, но когда я добавляю в PowerPoint, таблица выходит за пределы размера слайда.

Я не уверен, нужно ли мне просто пройти и установить размеры столбцов и строк, или есть что-то, что я должен настроить в своих основных настройках шаблона PowerPoint. Я видел, где вы можете установить размеры столбцов и строк, но ничего не сказал об общих размерах флеширования.

Код ниже.

library(officer)
library(rvg)
library(flextable)
library(tidyverse)
library(data.table)


pColor <- "#3c5cb0"
std_border = fp_border(color="gray")

outSatTbl <- flextable(head(iris, 19))

outSatTbl <- 
  outSatTbl %>%
  bg(bg = pColor, part = "header") %>% 
  color(color = "white", part = "header") %>%
  merge_h(part = "header") %>%
  add_header_lines(values = "Demo Table") %>%
  align(align = "center", part = "header") %>%
  align(align = "center", part = "body") %>%
  hline(part="body", border = std_border ) %>%
  autofit()


# ---------- Get PowerPoint template and initiate ---------- #


setwd("C:/.../WorkingFolder")

demo <- read_pptx("Rtest.pptx")


# ---------- Add Inpatient table to Power Point ----------- #

demo  <- add_slide(demo , layout = "Title and Content", master = "Theme1") %>%
  ph_with(outSatTbl, location = ph_location_type(type = "body"), use_loc_size = T) %>%
  


print(mho, target = "first_example.pptx")

Это делает стол слишком большим. Я могу изменить его размер, и таблица по-прежнему выглядит великолепно, просто пытаюсь найти то, что мне не хватает.

Демо PowerPoint

См. также:  Добавить новый столбец в кадр данных состояния на основе данных другого столбца
Понравилась статья? Поделиться с друзьями:
IT Шеф
Комментарии: 1
  1. James Holland

    Один из вариантов — установить значения по умолчанию и изменить font.size a la:

    set_flextable_defaults(
      font.size = 28
    )
    

    в вашем куске.

Добавить комментарий

;-) :| :x :twisted: :smile: :shock: :sad: :roll: :razz: :oops: :o :mrgreen: :lol: :idea: :grin: :evil: :cry: :cool: :arrow: :???: :?: :!: