Есть ли способ отобразить несколько таблиц в RStudio Viewer?

Question

Если я запускаю следующий код кросс-таблицы, используя ctable функция от summarytools пакет:

library(summarytools)
data(mtcars)
varlist <- names(mtcars[,3:5])
crosstables <- list(NULL)
for (i in varlist){
  crosstables[[i]] <- ctable(mtcars[[i]], mtcars$cyl, prop = 'r', style="simple", method = "render", header=TRUE)
  view(crosstables[[i]])
  }

вместо просмотра трех таблиц кросс-таблицы в средстве просмотра RStudio отображается только последняя. Если я попытаюсь отобразить все три таблицы:

view(crosstables)

Я получаю следующее сообщение об ошибке:

x must either be a summarytools object created with freq(), descr(), or a list of freq() / descr() objects created using by(), or a list of freq() objects created using lapply(). Support for by() used with ctable() may be available in future realeases.

Есть ли способ сложить все три таблицы в одном окне просмотра? Может быть, способ объединить выходные файлы html для кросс-таблиц?

Answer 1

Ты можешь измениться view в print и вяжем в HTML

Это тот же код:

library(summarytools)
data(mtcars)
varlist <- names(mtcars[,3:5])
crosstables <- list(NULL)
for (i in varlist){
  crosstables[[i]] <- ctable(mtcars[[i]], mtcars$cyl, prop = 'r', style="simple", method = "render", header=TRUE)
  print(crosstables[[i]])
  }

Только последняя строка отличается. А затем используйте функцию вязания RStudio:

ht tps:https://stackru.com/images/1825f2d058ddbc12ba50f5115ed2c47fa3d8f38a.png

Answer 2

В качестве альтернативы решению уценки есть append параметр пакета print метод / viewфункции. Итак, когда вы используетеfile параметр и прямые выходы из вашей первой кросс-таблицы в файл html, вы можете использовать тот же путь к файлу для двух других, используя append=TRUE.