Better color scale for quantitative variable in MDS plots

9f80df55 · mahendra-mariadassou · e9cd5af6 · 9f80df55
Commit 9f80df55 authored Aug 23, 2018 by mahendra-mariadassou
Show whitespace changes
Inline Side-by-side

Showing with 51 additions and 51 deletions

server.R server.R +51 -51

No files found.
--- a/server.R
+++ b/server.R
@@ -842,7 +842,7 @@ shinyServer
      axes = as.numeric(input$acpAxes),
      title = checkNull(input$acpTitle),
      color = checkNull(input$acpCol),
-      replicate = checkNull(input$acpRep),
+      replicate = if (is.null(checkNull(input$acpRep))) { NULL } else { checkNull(input$acpRep) },
      shape = checkNull(input$acpShape),
      label = checkNull(input$acpLabel)
    )