Commit 8051dd2f authored by Lena Hersemann's avatar Lena Hersemann

data exploration is now only able if at least one PC was selected

parent 2c505548
......@@ -164,6 +164,7 @@ app <- shinyApp(
observeEvent(input$update_loaded_data, {
req(length(input$data_loaded) > 0)
selected_samples <- input$data_loaded
updateSelectInput(session, "choosen_cluster_name", label = "Choose clustering", choices = selected_samples, selected = selected_samples[1])
updateTabsetPanel(session, inputId = "tabs", selected = "explore_data")
......
Markdown is supported
0% or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment