我正在努力添加一些功能来隐藏/显示应用的各个部分。下面的代码在隐藏/显示页面部分方面做了我想要的，但是，当controllerRotationx.__li.setAttribute( "style", "display: none" );
元素内部，verbatimTextOutput没有正确显示。
div(class = "target")我已尝试将ui <- basicPage(
# Adds CSS for links to work correctly
tags$head(
tags$style(HTML("
.target > div {
display:none;
}
.target > div:target{
display:block;
}"))
),
# Adds links
a("Page 1",href = "#p1"),
a("Page 2", href = "#p2"),
# Pages for links
verbatimTextOutput("works")
div(class = "target",
div(id = "p1",
verbatimTextOutput("doesnt")
),
div(id = "p2",
"Other page")
)
)
server <- function(input, output){
output$works <- renderPrint("Yay!")
output$doesnt <- renderPrint("Hello")
}
shinyApp(ui, server)
更改为display:none;，但这似乎没有任何帮助。
这肯定与display:hidden属性有关。如果我将CSS更改为其他内容（例如将边框从虚线更改为实体），它可以正常工作。请参阅以下代码：
display:none;所以现在的问题是如何在未显示的div中呈现UI元素？
这里讨论display：none属性的问题：https://groups.google.com/forum/#!topic/shiny-discuss/yxFuGgDOIuM