Как использовать пакет {gtsummary} в приложении r shiny

Question 1

Можно ли отобразить таблицу с помощью {gtsummary} в блестящем приложении?

library(gtsummary)
# make dataset with a few variables to summarize
iris2 <- iris %>% select(Sepal.Length,  Sepal.Width, Species)

# summarize the data with our package
table1 <- tbl_summary(iris2)
table1

В приложении Shiny: ->

shinyApp(
ui = fluidPage(
  fluidRow(
    column(12,
      tableOutput('table')
    )
  )
),
server = function(input, output) {
  output$table <- renderTable(table1)
})

Спасибо.

r shiny gtsummary

4

TarJae 4 Окт 2020 в 19:18

Answer

Может это то, что вы ищете. Чтобы отобразить таблицу gt в блестящем приложении, вы должны использовать gt::gt_output и gt::render_gt. Чтобы это работало для вашей таблицы gtsummary, вам необходимо преобразовать ее в таблицу gt с помощью as_gt():

library(shiny)
library(gtsummary)
library(gt)
# make dataset with a few variables to summarize
iris2 <- iris %>% select(Sepal.Length,  Sepal.Width, Species)

# summarize the data with our package
table1 <- tbl_summary(iris2) %>% as_gt()
table1

shinyApp(
  ui = fluidPage(
    fluidRow(
      column(12,
             gt_output('table')
      )
    )
  ),
  server = function(input, output) {
    output$table <- render_gt(table1)
  })

4

stefan 4 Окт 2020 в 16:42

Question 2

Может это то, что вы ищете. Чтобы отобразить таблицу gt в блестящем приложении, вы должны использовать gt::gt_output и gt::render_gt. Чтобы это работало для вашей таблицы gtsummary, вам необходимо преобразовать ее в таблицу gt с помощью as_gt():

library(shiny)
library(gtsummary)
library(gt)
# make dataset with a few variables to summarize
iris2 <- iris %>% select(Sepal.Length,  Sepal.Width, Species)

# summarize the data with our package
table1 <- tbl_summary(iris2) %>% as_gt()
table1

shinyApp(
  ui = fluidPage(
    fluidRow(
      column(12,
             gt_output('table')
      )
    )
  ),
  server = function(input, output) {
    output$table <- render_gt(table1)
  })

4

stefan 4 Окт 2020 в 16:42

Как использовать пакет {gtsummary} в приложении r shiny

1 ответ

Похожие вопросы

Связанные вопросы

Новые вопросы

r