2015-03-03 71 views
0

當談到閃亮時,我是一個相當新手。 在我的應用程序中,我需要隱藏一個按鈕,當我點擊它時,在這裏我引入了JS來獲得該效果,但是我無法獲取它,因爲運行該應用程序時按鈕不顯示。如何隱藏使用Javascript的Shiny中的動作按鈕

以下是我使用的代碼。

ui.R

shinyUI(fluidPage(

titlePanel("Conditional panels"), 

column(3, wellPanel(
a<-actionButton("action", label="Action"), 
br(), 
br() 
)), 

column(4, 
    "This will show the button", 
    "when we click action.", 

    conditionalPanel("input.action > 0", 
         a1<- actionButton("show1", label="Show_1"), a2<-actionButton("show2", label="Show_2"), tags$script('document.getElementById("action").style.visibility="hidden";')) 
) 
)) 

這是一個有點混亂。 除了我可以探索的conditionalPanel外,是否還有其他方法? 我是否還需要服務器中的額外配置?R

請幫助。

+0

好吧,現在你只是隱藏它。但是你說你想在點擊時隱藏它。因此,添加一個IF語句到JavaScript。 – LauriK 2015-03-03 10:16:12

+0

我試過但它不會讀If語句和輸出保持不變 – rahulkn 2015-03-03 11:28:14

回答

1

你可以添加一些javascript,當你點擊它時會隱藏按鈕。

離開你的UI相同的休息,你可以使用:

column(3, wellPanel(
    a<-actionButton("action", label="Action"), 
    tags$script(HTML('document.getElementById("action").onclick = function(){$(this).hide() }')), 
    br(), 
    br() 
)) 

jQuery的功能hide將按鈕一旦點擊被調用。

+0

非常感謝,很好,代碼工作正常。 – rahulkn 2015-03-03 13:45:24