使用collapsibleTree的RShiny中的垂直可折叠树

时间:2018-04-24 22:29:02

标签: shiny bootstrap-modal

我正在尝试构建一个Rshiny应用程序,它需要显示树状结构。为此,我在R中使用名为collapsibleTree的包。使用此包显示的树是水平方向,但是,我只是好奇,如果有办法在垂直方向显示它?我查看了他们的文档但找不到任何文档。 下面是可重现的代码。另外,我使用bsModal将树显示在弹出窗口中,这是我想要改变弹出方向的替代方式(从水平到垂直,不确定,如果可以实现相同) 。

library(shiny)
library(collapsibleTree)
# Define UI for application that draws a collapsible tree
ui <- fluidPage(
  # Application title
  titlePanel("Collapsible Tree Example 2: Shiny Interaction"),
    # Show a tree diagram with the selected root node
    mainPanel(
      collapsibleTreeOutput("plot")
    )
  )
)
# Define server logic required to draw a collapsible tree diagram
server <- function(input, output) {
  output$plot <- renderCollapsibleTree({
       hierarchy <- c("wool","tension","breaks")
    collapsibleTree(
      warpbreaks, hierarchy
    )
  })
}
# Run the application
shinyApp(ui = ui, server = server)

0 个答案:

没有答案