diff --git a/dashboard/server.R b/dashboard/server.R index 7f277dc9bda29edf0a576095d98e445fbe4c6625..05f4294a3f2f15fb6cdad2ea8d0afdfa309247de 100644 --- a/dashboard/server.R +++ b/dashboard/server.R @@ -52,7 +52,7 @@ server <- function(input, output) { lastCoCoQuest }) - # Getting + #TODO: Getting HEADER out of json to select it output$input_hist_x <- renderUI({ selectInput("in1", "x-axis:", as.list(coconut.df),multiple=TRUE, selectize=TRUE) }) diff --git a/dashboard/ui.R b/dashboard/ui.R index a1f65ce2cd86a3700149adc68eb195f3ed876a9b..2adeff95456c5138e64b1a0ad3cfbf6982ca7e00 100644 --- a/dashboard/ui.R +++ b/dashboard/ui.R @@ -65,7 +65,6 @@ ui <- dashboardPage( tabItem(tabName = "controlls", h2("Controlls here:"), - #TODO: SelectInput --> Get data out of loaded json to select it checkboxInput("histogram", "Histogram", FALSE), uiOutput("input_hist_x"), uiOutput("input_hist_y"),