R，GGally中的颜色:: ggsurv

Question

我试图将多条生存曲线绘制在一起。 我正在使用：

library('GGally')
all_data <- rbind((cbind(data_0, type = 'cs0')),(cbind(data_1, type = 'cs1')),(cbind(data_2, type = 'cs2')))
ggsurv(sf.varmints, CI=TRUE)

我得到了这个情节

但我希望置信区间与其线条具有相同的颜色。现在所有这些都是黑色的，我希望它们是红色，绿色，蓝色。还有用于标记审查观察的点的颜色与其线条具有相同的颜色。

感谢任何帮助。

Answer 1

我没有使用该套餐（如果这是您正在使用的套餐），但我不会立即看到它是如何完成的。

我过去曾使用类似的功能，它有更多我喜欢的选项和设置，但它不是在头上，所以你需要从repo下载它像这样< / p>

# install.packages('devtools')
devtools::install_github('raredd/plotr')
library('plotr')
library('survival')

fit <- survfit(Surv(time, status) ~ ph.ecog, data = cancer[cancer$ph.ecog < 3, ])
ggsurv(fit, legend = FALSE, atrisk = FALSE, col.surv = c('red','green','blue'))

将此与我偏向的基础图比较

plot(fit, col = c('red', 'green', 'blue'), las = 1, family = 'serif', conf.int = TRUE)
title(xlab = 'Time', ylab = 'Probability of survival', line = 2.5)

我没有使用它，所以我无法保证它没有错误。而且你甚至不必下载软件包，你只需要ggsurv and survdat_ functions来获得这个图。