MenuItems 내 반짝이 대시 보드 입력 문제

Question

반짝 이는 대시 보드가 처음인데 간단한 대시 보드를 만들 때 손을 잡으려고합니다. 기본적으로 다른 클러스터링 알고리즘을 거치고 작동 방식을 보여주는 대시 보드를 구성하려고합니다.

전반적인 분기 토픽에 대한 메뉴 항목이 있으며, 클러스터링 알고리즘에 대한 매개 변수를 지정하는 메뉴 항목을 입력합니다.

내 문제는 내 화면에 출력되지 않습니다. 플롯을 렌더링 할 수 없기 때문에 tabItems 안에 배치 한 상자의 제목을 볼 수도 있습니다. 이것은 내 메뉴 항목 중 하나에 하위 항목을 배치 할 때 발생합니다. 왜 그런지 모르겠습니다.

첨부 된 내 ui.R 스크립트 및 server.R 스크립트입니다.

ui.R 파일 :

server.R 파일 :이 문제에 어떤 도움이 많이 주시면 감사하겠습니다

.

Answer 1

따라서 알 수있는 한, 문제는 menuItem 내에 radioButton을 배치했기 때문입니다. kclustering 탭이 활성화되어있을 때 radioButtons 만 표시하려면 에 radioButtons을 입력해야합니다. 그것은 당신의 상태를 공식화 할 수 있도록 sidebarMenu 객체의 id 인수를 설정하는 것이 중요합니다,이 경우

library(shinydashboard) 

ui <- dashboardPage(
    dashboardHeader(title = "Bla"), 
    dashboardSidebar(
    sidebarMenu(
     id = "tabs", 
     menuItem(
     "K-clustering", 
     tabName = "kclustering", 
     icon = icon("cogs")), 
     conditionalPanel(
     "input.tabs == 'kclustering'", 
     radioButtons("technique", "Technique Choice", 
       c("K-Means" = "kmeans", 
        "K-Medians" = "kmedians", 
        "K-Medoids" = "kmedoids"), 
       select = "kmedians") 
     ), 
     menuItem("DBSCAN", tabName = "dbscan") 
    ) 
), 
dashboardBody(
    tabItems(
    tabItem("kclustering", 
     fluidRow(
     box(plotOutput("step1")) 
     )) 
    ) 
)) 

server <- function(input, output) { 

    output$step1 <- renderPlot({ 

    hist(rnorm(5000)) 

    }) 

} 

runApp(shinyApp(ui, server)) 

: 그것은처럼 보일 것입니다. 결론 : radioButtons, sliderInput 및 textInput을 menuItem 개체 안에 넣고 sidebarMenu 개체 자체에 넣지 마십시오.