2015-03-03 55 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