随机数组合的方法：选取一个随机数发生器，生成1000个随机数，令这100个随机数生成数组并命名为t。同时令n=1，命名最终需要的随机数数组为x，选取第二个发生器，生成一个随机数j，且满足1而随机数组合的难点在于，步骤2步骤3的时候随机数种子的选取比较难。这里用的是第一个随机数发生器生成的随机数作为种子，也自己定义其他的种子。
R语言使用技巧
当你要对按照数据框某一列的信息对文件进行分组时
1. 可以使用split函数
2. 可以使用group_by() 函数，但是这个函数不能方便你接下来对每个小的group进行更为复杂的操作。
3. group_split() 函数
4. group_nest() 函数以及nest()函数
具体参数可参考：
https://www.jianshu.com/p/2efbf6632dc6
group_list()可以把大的数据框按照某一列切分为小的数据框，这些小的数据框再组成一个list
参考： https://mp.weixin.qq.com/s/XGb3P6SY2UlZMgun_etFmg
nest()函数可以创建嵌套数据框，将多列多行组成一个列表，而这个列表单独成为一列，称为列表列。
nest() 函数有两种使用方式。当用于分组数据框时，nest() 函数会保留用于分组的列，而将其他所有数据归并到列表列中。
还可以在未分组数据框上使用nest()，此时需要指定嵌套哪些列。
使用这些函数时，要清楚输入输出的格式是什么，怎么样取值才能得到想要的格式，是使用appply还是lapply，以及map要根据实际情况来定。
ggsurvplot( fit, #生存分析结果 data = NULL, #a dataset used to fit survival curves fun = NULL, # 定义生存曲线转换的任意函数。 经常使用的转换可以用字符参数指定:“event”绘制累积事件(f(y) = 1-y)，“cumhaz”绘制累积风险函数(f(y) = -log(y))，“pct”以百分比表示生存概率。 color = NULL, #曲线颜色 palette = NULL, #颜色调色板，可选调色板有 "grey","npg","aaas","lancet","jco", "ucscgb","uchicago","simpsons"和"rickandmorty". linetype = 1, #线条形状，可以用数值型向量1，2表示，也可以用字符串向量c("solid", "dashed"). conf.int = FALSE, #是否画出置信区间 pval = FALSE, #是否显示P值 pval.method = FALSE, #是否添加计算P值得方法得文本，前提是pval = TRUE test.for.trend = FALSE, #默认是F，如果TURE，返回trend Pvalues检验。 趋势检验旨在检测生存曲线的有序差异。 也就是说，至少对一个群体来说。 只有组数为>2时，才能进行趋势测试。 surv.median.line = "none", #画一条水平或者垂直得生存中位值线，允许的值有c("none", "hv", "h", "v"). v: 垂直vertical, h:水平horizontal. risk.table = FALSE, #是否显示风险table。其他值有absolute" or "percentage",显示绝对数值/百分比；参数"abs_pct" ,百分比以及绝对数值都显示 cumevents = FALSE, # logical value specifying whether to show or not the table of the cumulative number of events. cumcensor = FALSE, #logical value specifying whether to show or not the table of the cumulative number of censoring. tables.height = 0.25, #设置table得高度，取值范围0-1 group.by = NULL, #包含分组变量名称得字符串向量。长度<=2 facet.by = NULL, #一个字符向量，包含将生存曲线分成多个面板的分组变量的名称。 add.all = FALSE, #一个逻辑值。 如果为TRUE，则在主图中添加合并患者(null model)的生存曲线。 combine = FALSE, # a logical value. If TRUE, combine a list survfit objects on the same plot. ggtheme = theme_survminer(), #主题名称 tables.theme = ggtheme, #主题名称，默认是theme_survminer. ... #后面描述的参数和其他参数将被传递给ggplot2 geom_*()函数，如linetype, size, ii)或ggpar()函数来定制图形。 看到的细节部分 )
