Вертикальное разборное дерево в RShiny с использованием collapsibleTree - PullRequest
Новая
       10

Вертикальное разборное дерево в RShiny с использованием collapsibleTree

0 голосов
/ 25 апреля 2018

Я пытаюсь создать приложение Rshiny, для которого требуется отображать древовидную структуру. Для этого я использую пакет с именем collapsibleTree в R. Дерево, отображаемое с помощью этого пакета, расположено в горизонтальном направлении, но мне просто интересно, есть ли способ отобразить его в вертикальном направлении? Я просмотрел их документацию, но не смог их найти. Ниже приведен воспроизводимый код. Кроме того, я использую 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)
...