shiny : 이미지를 클릭 할 때 탭을 변경하십시오.

Question

Shiny 애플리케이션을 구축하고 있으며 일부 사용자 (이 레이아웃에 익숙하지 않은 사용자)는 애플리케이션이 탭과 함께 작동하며 보이지 않는 것을 이해하지 못합니다. 어디에서 홈페이지로 이동합니다.

그래서 내가 메인 페이지에 큰 infography를 표시하려고하고, 클릭하면 두 번째 탭이 자동으로 활성화됩니다. 나는 이미지에 링크를 추가하는 방법을 알고 :

tags(a(img(src="image.png"), href="link.com")) 

그리고 프로그래밍 다른 탭을 선택하는 방법을 알고 :

updateTabsetPanel(session, inputId="navbar", selected="tab2") 

하지만 어떻게 그 두 작업을 결합? 당신은 이미지 id을주고, shinyjs에서 onclick() 기능을 사용할 수 있습니다

Answer 1

감사합니다. 실제 사례 :

require(shiny) 
require(shinyjs) 


ui <- fluidPage(
    img(id="my_img",src="image.png",style="cursor:pointer;"), 
    useShinyjs(), 
    tabsetPanel(id="navbar", 
       tabPanel("tab1", p("This is tab 1")), 
       tabPanel("tab2", p("This is tab 2")) 
) 
) 



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

    shinyjs::onclick("my_img", updateTabsetPanel(session, inputId="navbar", selected="tab2")) 

} 

shinyApp(ui,server) 

희망이 있습니다.