Вопрос новичка, извините, если это очевидная ошибка.Я создал таблицу сводной статистики, используя функцию summary_table в r.Когда я запускаю код в markdown, он создает таблицу, как и ожидалось, но когда я пытаюсь связать rmd с html для публикации на rpubs, она выглядит следующим образом:
## |Summary Statistics |ESS (N = 73) |
## |:--------------------------------|:-------------------------------|
## |**Alcohol drunk at the weekend** | |
## | variable |interval |
и так далее ...
(таблица должна выглядеть следующим образом: https://cran.r -project.org / web / packages / qwraps2 / vignettes / summary-statistics.html )
Я знаю, что у меня естьзакодировал qwraps2_markup равным 'markdown', но я не уверен, как создать ту же таблицу без этого.
```{r}
options(qwraps2_markup = 'markdown')
our_summary <-
list("Alcohol drunk at the weekend" =
list("variable" =~ c("interval"),
"min" = ~ min(ESS$alcwknd),
"median" = ~ median(ESS$alcwknd),
"max" = ~ max(ESS$alcwknd),
"mean (sd)" = ~ qwraps2::mean_sd(ESS$cgtsday)),
"Cigarettes smoked" =
list("variable" =~ c("interval"),
"min" = ~ min(ESS$cgtsday),
"median" = ~ median(ESS$cgtsday),
"max" = ~ max(ESS$cgtsday),
"mean (sd)" = ~ qwraps2::mean_sd(ESS$cgtsday)),
"Age" =
list("variable" =~ c("Interval"),
"min" = ~ min(ESS$agea),
"median" = ~ median(ESS$agea),
"max" = ~ max(ESS$agea),
"mean (sd)" = ~ qwraps2::mean_sd(ESS$agea)),
"Time helping others" =
list("variable" =~ c("Ratio"),
"mode" =~ time_mode),
"Felt Depressed" =
list("variable" =~ c("Ordinal"),
"mode" =~ dpr_mode),
"Main Activity" =
list("variable" =~ c("Categorical"),
"mode" =~ act_mode))
tab <- summary_table(ESS, our_summary)
print(tab, rtitle = "Summary Statistics")
```
Любая помощь высоко ценится и заранее спасибо.