remove per minute

citizenair/inst/apps/citizenair/page02-exploratory.Rmd

@@ -116,7 +116,7 @@ observeEvent(input$uiInput_downloadtimeseries, {
 ```{r}
 #inputPanel(
   radioButtons(inputId = "uiInput_aggregationlevel", label = "Vergelijk", 
-               choices = c("Per minuut" = "min", 
+               choices = c(#"Per minuut" = "min", 
                            "Per uur" = "hour", 
                            "Per dag" = "day", 
                            "Per maand" = "month", 
@@ -327,7 +327,7 @@ renderValueBox({
   userdata <- citizenair_userdata()
   filename <- userdata$appdata$getCitizenData("fileinfo")$name
   if(length(filename) > 0){
-    ui <- valueBox("Uw excel file", caption = filename)    
+    ui <- valueBox("geladen excel", caption = filename)    
   }else{
     ui <- NULL 
   }
@@ -343,7 +343,7 @@ renderUI({
   x <- userdata$appdata$getCitizenData("meta")
   if(is.data.frame(x) && nrow(x) > 0){
     choices <- structure(as.list(x$sheet_id), .Names = x$sheet)
-    ui <- selectInput(inputId = "uiInput_sheet", label = "Selecteer sheet", choices = choices, selected = choices, multiple = TRUE)
+    ui <- selectInput(inputId = "uiInput_sheet", label = "Selecteer sheet - om te verwijderen selecteer een sheet en druk op je delete knop", choices = choices, selected = choices, multiple = TRUE)
   }else{
     ui <- NULL
   }