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)){