fixed colour palette

noramvillanueva · Apr 25, 2018 · 73e905b · 73e905b
1 parent 3d1bea8
commit 73e905b
Showing 1 changed file with 1 addition and 1 deletion.
diff --git a/R/autoplot.clustcurv_surv.R b/R/autoplot.clustcurv_surv.R
@@ -56,7 +56,7 @@ autoplot.clustcurv_surv <- function(x = object, groups_by_colour = TRUE,
 
   k <- length(x$centers$strata)
  # colnm <- wesanderson::wes_palette("Zissou", length(x$levels), type = c("continuous"))
-  colgr <- wesanderson::wes_palette("Zissou", k, type = c("continuous"))
+  colgr <- wesanderson::wes_palette("Zissou1", k, type = c("continuous"))
 
   if(!isTRUE(centers)){