Как развернуть латексный формат таблицы kable в markdown

#r #r-markdown #pdflatex #kable #kableextra

Вопрос:

Мне нужно создать много таблиц kable, поэтому я использую цикл for и сохраняю эти таблицы в списке, но когда я пытаюсь развернуть таблицу kable из списка в markdown, результатом является код latex, а не pdf, что я могу сделать, чтобы решить эту проблему?

 table <- data.frame(col1 = c(1:30), col2 = c(rep(a, 10), rep(b, 10), rep(c, 10)))

t_list <- list()

for (letter in unique(table$col2)){
    a <- table %>% filter(col2 == letter)
    aa <- a %>% kbl()
    t_list <- append(t_list, aa)
}

# R Markdown ------------------
```{r}
t_list[[1]]
```

# output in latex not in pdf
 

Спасибо

Комментарии:

1. вам нужен выходной документ в формате pdf с таблицей kable? Почему бы просто не использовать kable(t_list[[1]]) ?

Ответ №1:

Решение должно быть относительно простым, путем запроса вывода inline ( r t_list[[1]] ), а не в фрагменте кода R. Таким образом, я смог воспроизвести ваш код и создать PDF-файл для печати первой таблицы, как в вашем коде выше:

 ```{r}
table <- data.frame(col1 = c(1:30), col2 = c(rep("a", 10), rep("b", 10), rep("c", 10)))

t_list <- list()

for (letter in unique(table$col2)){
    a <- table %>% filter(col2 == letter)
    aa <- a %>% kbl() %>%
kable_styling(latex_options = "striped")
    t_list <- append(t_list, aa)
    aa
}
```

# R Markdown ------------------
`r t_list[[1]]`
 

Смотрите это изображение в качестве краткого примера:
Вывод в формате PDF

Надеюсь, это поможет, но, пожалуйста, дайте мне знать, если это не поможет.