Forest plot for multiple cox regression (Hazard Ratio)

本文介绍如何利用R语言进行多重Cox回归分析,并通过Forest plot展示各因素的风险比(Hazard Ratio),帮助理解不同变量对生存时间的影响。
摘要由CSDN通过智能技术生成

library(forestplot)
library(survival)
library(survminer)
setwd("/Users/elijah/Desktop/ICGC/21.multiIndep")
rt=read.table("/Users/elijah/Desktop/ICGC/21.multiIndep/indepInput.txt",header=T,sep="\t",check.names=F,row.names=1)

multiCox=coxph(Surv(futime, fustat) ~ ., data = rt)
summary(multiCox)
multiCoxSum=summary(multiCox)

outTab=data.frame()
outTab=cbind(
  HR=multiCoxSum$conf.int[,"exp(coef)"],
  HR.95L=multiCoxSum$conf.int[,"lower .95"],
  HR.95H=multiCoxSum$conf.int[,"upper .95"],
  pvalue=multiCoxSum$coefficients[,"Pr(>|z|)"],
  N= multiCoxSum$n)
outTab=cbind(id=row.names(outTab),outTab)
outTab=as.data.frame(outTab)
a = 2:ncol(outTab)
for (i in a ){
  outTab[,i]= as.numeric(outTab[,i])
  outTab
评论
添加红包

请填写红包祝福语或标题

红包个数最小为10个

红包金额最低5元

当前余额3.43前往充值 >
需支付:10.00
成就一亿技术人!
领取后你会自动成为博主和红包主的粉丝 规则
hope_wisdom
发出的红包
实付
使用余额支付
点击重新获取
扫码支付
钱包余额 0

抵扣说明:

1.余额是钱包充值的虚拟货币,按照1:1的比例进行支付金额的抵扣。
2.余额无法直接购买下载,可以购买VIP、付费专栏及课程。

余额充值