Как скрыть радиокнопки в реактивном в блестящем

Как я могу удалить столбец переключателей из реагирующей таблицы в моем приложении Shiny, но сохранив аргумент selection = "single"?

Мой репрекс основан на этом решении скрыть флажок «все/нет» с помощью selection = "multiple", я надеялся, что смогу сделать что-то подобное, чтобы удалить переключатели.

app.R:

library(shiny)
library(reactable)

ui <- fluidPage(
  includeCSS("hide_radio.css"),
  titlePanel("Hide radio buttons"),
  mainPanel(reactableOutput("table"))
)

server <- function(input, output) {
    output$table <- renderReactable({
      reactable(
        mtcars,
        selection = "single",
        columns = list(
          .selection = colDef(
            headerStyle = list(pointerEvents = "none")
          )
        ),
        theme = reactableTheme(
        headerStyle = list("& input[type='checkbox']" = list(display = "none"))
        )
      )
    })
}

shinyApp(ui = ui, server = server)

hide_radio.css:

.hide-checkbox {
  pointer-events: none;
}

.hide-checkbox input[type='checkbox'] {
  display: none;
}

r shiny reactable

12.04.2023 09:09

Стоит ли изучать PHP в 2023-2024 годах?

Привет всем, сегодня я хочу высказать свои соображения по поводу вопроса, который я уже много раз получал в своем сообществе: "Стоит ли изучать PHP в...

Поведение ключевого слова "this" в стрелочной функции в сравнении с нормальной функцией

В JavaScript одним из самых запутанных понятий является поведение ключевого слова "this" в стрелочной и обычной функциях.

Приемы CSS-макетирования - floats и Flexbox

Здравствуйте, друзья-студенты! Готовы совершенствовать свои навыки веб-дизайна? Сегодня в нашем путешествии мы рассмотрим приемы CSS-верстки - в...

Тестирование функциональных ngrx-эффектов в Angular 16 с помощью Jest

В системе управления состояниями ngrx, совместимой с Angular 16, появились функциональные эффекты. Это здорово и делает код определенно легче для...

Концепция локализации и ее применение в приложениях React ⚡️

Локализация - это процесс адаптации приложения к различным языкам и культурным требованиям. Это позволяет пользователям получить опыт, соответствующий...

Пользовательский скаляр GraphQL

Листовые узлы системы типов GraphQL называются скалярами. Достигнув скалярного типа, невозможно спуститься дальше по иерархии типов. Скалярный тип...

Перейти к ответу Данный вопрос помечен как решенный

Ответы 1

Ответ принят как подходящий

Изменить. Если вы хотите скрыть весь столбец (а не только элементы), есть гораздо более простой способ:

library(shiny)
library(reactable)

ui <- fluidPage(
  titlePanel("Hide radio buttons"),
  mainPanel(reactableOutput("table"))
)

server <- function(input, output) {
  output$table <- renderReactable({
    reactable(
      mtcars,
      selection = "single",
      columns = list(
        # mpg  = colDef(show = FALSE),
        .selection = colDef(show = FALSE)
      )
    )
  })
}

shinyApp(ui = ui, server = server)

Однако эту процедуру необходимо адаптировать после обновления базовой библиотеки реагирующих таблиц в пакете R:

Показ свойств столбца устарел. Используйте initialstate.hiddenColumns вместо.

Проверить: https://github.com/tannerlinsley/react-table/issues/1804

Первоначальный ответ: Пожалуйста, проверьте следующее:

library(shiny)
library(reactable)

ui <- fluidPage(
  tags$head(
    tags$style(
      HTML("
            .hide-checkbox {
              pointer-events: none;
            }
            .hide-checkbox input[type=checkbox], input[type=radio] {
              display: none !important;
            }
           ")
    )
  ),
  titlePanel("Hide radio buttons"),
  mainPanel(reactableOutput("table"))
)

server <- function(input, output) {
  output$table <- renderReactable({
    reactable(
      mtcars,
      selection = "single",
      columns = list(
        .selection = colDef(
          headerClass = "hide-checkbox"
        )
      )
    )
  })
}

shinyApp(ui = ui, server = server)

Это потрясающе! Можно ли также удалить пробел?

— 13.04.2023 00:41

12.04.2023 13:50