>

찾아보기 : 나중에 확인란을 클릭하면 왼쪽 하단에 알림이 표시됩니다. 반짝임은 나중에 체크 박스를 선택하거나 두 번째 체크 박스를 선택하면 선택 해제 할 때 동작을 보지만 ... 마지막 체크 박스를 선택 취소 할 때 반짝임을 표시하지 않습니다!

library(shiny)
ui <- fluidPage(
  checkboxGroupInput("ccc", "ccc", choices = c("choice1", "choice2"), selected = c("choice1", "choice2"))
)
server <- function(input, output){
  observeEvent(input$ccc, {
    showNotification("clicked!", type = "default")
  })
}
shinyApp(ui, server)

  • 답변 # 1

    observe 가 필요 없습니다   observeEvent 로  이미 ignoreNULL 라는 기능이 있습니다.  추가하면됩니다. 기본적으로이 값은 TRUE 로 설정됩니다

    library(shiny)
    ui <- fluidPage(
      checkboxGroupInput("ccc", "ccc", choices = c("choice1", "choice2"), selected = c("choice1", "choice2"))
    )
    server <- function(input, output){
      observeEvent(input$ccc, {
        showNotification("clicked!", type = "default")
      },ignoreNULL = F)
    }
    shinyApp(ui, server)
    
    

  • 답변 # 2

    모든 개체를 선택 취소하면 NULL 가 생성됩니다  객체 input$ccc . observeEvent 를 변경 해야하는 모든 객체를 선택 취소하는 이벤트를 잡을 수 있습니다.   observe 에  이렇게 :

    library(shiny)
    ui <- fluidPage(
        checkboxGroupInput("ccc", "ccc", choices = c("choice1", "choice2"), selected = c("choice1", "choice2"))
    )
    server <- function(input, output){
        observe({
            input$ccc
            showNotification("clicked!", type = "default")
        })
    }
    shinyApp(ui, server)
    
    

  • 이전 트리거 (mysql)에 선언 된 변수를 어떻게 선택할 수 있습니까?
  • 다음 wordpress - 다른 사이트의 PHP 로딩 정보에 대한 WP 보안 차단 기능 향상