html kable_styling не показывает вывод в цикле for - PullRequest
Новая
       10

html kable_styling не показывает вывод в цикле for

0 голосов
/ 23 января 2019

Я хочу использовать kable внутри цикла for для генерации множества таблиц в HTML-разметке.Я искал решения, и большинство из них было решено с помощью обертки вокруг кода kable.Но когда я хочу сгенерировать вывод html-таблицы с помощью kable_styling, это решение не сработало!Например: 

table <- tibble(a = c(1:10),
            b = letters[1:10])


for(each in 1:2) {

print(table %>%
  kable())

  cat("<br>")

}

Это генерирует две простые таблицы.

Но когда я пытаюсь: 

table <- tibble(a = c(1:10),
            b = letters[1:10])


for(each in 1:2) {

print(table %>%
  kable() %>%
    kable_styling("striped"))

  cat("<br>")

}

Ничего не происходит!И это только для вывода HTML.С латексом все нормально.Что мне делать?

1 Ответ

0 голосов
/ 23 января 2019

Добавьте htmltools::HTML() к вашей трубе: 

table %>%
  kable() %>%
  kable_styling("striped") %>% 
  htmltools::HTML() %>% 
  print
...