我正在尝试修改并更好地理解函数的ggsurvplot()
工作方式(包:)survminer
:
首先是一些代码:
suppressPackageStartupMessages(library(survival))
suppressPackageStartupMessages(library(survminer))
suppressPackageStartupMessages(library(tidyverse))
set.seed(2020)
exp <- sample_n(lung, size = 10, replace = F) %>%
select(time, status)
exp <- sample_n(lung, size = 10, replace = F) %>%
select(time, status)
exp$survival <- Surv(exp$time, exp$status == 2)
exp_fit <- survfit(survival ~ 1, data = exp, conf.type = "log-log")
ggsurvplot(exp_fit,
data = exp,
palette = "black",
censor.shape = "I",
censor.size = 5.5,
xlab = "days",
ylab = "survival probability",
conf.int = T,
surv.scale = "percent",
legend.title = "censored data",
legend.lab = "",
legend ="bottom")
使用的数据框称为lung
. 数据包含在包中survival
。
基本上我有两个问题:
该图应打印置信区间,但它们是什么类型的?它们是否与我在
survfit()
用于创建对象的函数中指定的相同exp_fit
,如果不是,则需要更改哪些内容以便使用相同类型的置信区间?图例的字体很小。我怎样才能让它更大?我尝试使用
theme()
,但不幸的是它不起作用。
我会很感激你的回答。提前致谢。