2014-04-23 1 views

답변

19

tabsetPanel()tabPanel()에 할당 된 값을 반환합니다. 당신은 또 다른 출력을 업데이트 할 경우는 다음과 같이 할 수있다 :

ui.R을

library(shiny)  

shinyUI(basicPage( 

    textOutput("text"), 
     tabsetPanel(id = "tabs", 
      tabPanel("Tab A", value = "A", "This is Tab A content"), 
      tabPanel("Tab B", value = "B", "Here's some content for tab B.") 
) 

)) 

server.R

library(shiny) 

shinyServer(function(input, output) { 

    output$text <- renderText({paste0("You are viewing tab \"", input$tabs, "\"")}) 

}) 

하지만 더 아마도 필요 팝업을 만드는 것처럼 복잡한 일 옵저버 및 몇 가지 추가 사용자 지정 코딩을 만듭니다.

+2

예제가 작동하지 않습니다 ... 값이 정의되지 않았습니다! $ tabValue 대신 $ tabs를 입력하셨습니까? – Lalas

+1

예제가 작동하지 않습니다. 왜 '$ tabValue 값'입니까? –

+0

죄송합니다. 이전 답변이었습니다. 나는 그것을 바로 잡았다. – Eric

관련 문제