Как убрать первый столбец (индекс) из таблицы данных в R Shiny - PullRequest
Новая
       23

Как убрать первый столбец (индекс) из таблицы данных в R Shiny

1 голос
/ 18 марта 2019

Мне интересно, есть ли способ удалить столбец индекса (1-й столбец) из таблицы данных в Shiny.

Например, столбец (1, 2, 3) перед Имя столбца, как показано на скриншоте ниже:

enter image description here

Ниже мой код: 

header <- dashboardHeader(
  title = "Test"
)

sidebar <- dashboardSidebar(
)

body <- dashboardBody(
            box(title = "Test", width = 7, status = "warning", DT::dataTableOutput("df"))
)

# UI
ui <- dashboardPage(header, sidebar, body)

# Server
server <- function(input, output, session) {

  output$df = DT::renderDataTable(df, options = list(
    autoWidth = TRUE,
    columnDefs = list(list(width = '10px', targets = c(1,3)))))
    }

# Shiny dashboard
shiny::shinyApp(ui, server)

Заранее спасибо.

1 Ответ

1 голос
/ 18 марта 2019

Имеется отличная документация пакета, доступная по адресу https://rstudio.github.io/DT/. Я настоятельно рекомендую прочитать.

В любом случае используйте аргумент rownames = FALSE, предоставляемый пакетом DT, в качествеследует: 

library(shinydashboard)
library(DT)

df <- mtcars

header <- dashboardHeader(
  title = "Test"
)

sidebar <- dashboardSidebar(
)

body <- dashboardBody(
  box(title = "Test", width = 7, status = "warning", DT::dataTableOutput("df"))
)

# UI
ui <- dashboardPage(header, sidebar, body)

# Server
server <- function(input, output, session) {

  output$df = DT::renderDataTable(df, rownames = FALSE,
                                  options = list(
                                    autoWidth = TRUE,
                                    columnDefs = list(list(width = '10px', targets = c(1,3)))))
}

# Shiny dashboard
shiny::shinyApp(ui, server)
...