From 73e905ba72d250d4067bda758356f8be04c12219 Mon Sep 17 00:00:00 2001 From: noramvillanueva Date: Wed, 25 Apr 2018 18:17:17 +0200 Subject: [PATCH] fixed colour palette --- R/autoplot.clustcurv_surv.R | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/R/autoplot.clustcurv_surv.R b/R/autoplot.clustcurv_surv.R index f9026ff..7739259 100755 --- 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)){