使用http://www.oncolnc.org/
1.打開網(wǎng)站,輸入“favorite gene”
2.選擇cancer锉桑,P-K一下
3.輸入percentile
可見毕谴,高TP53表達(dá)影響B(tài)RCA患者的長(zhǎng)期生存
同樣地攻人,我們自己畫一下吧
1.導(dǎo)出數(shù)據(jù)
2.運(yùn)行R代碼
options(stringsAsFactors = F)
a=read.table('BRCA_7157_25_25.csv',sep = ',',fill = T,header = T)
dat=a
library(ggplot2)
library(survival)
library(survminer)
table(dat$Status)
dat$Status=ifelse(dat$Status=='Dead',1,0)
sfit <- survfit(Surv(Days, Status)~Group, data=dat)
sfit
summary(sfit)
ggsurvplot(sfit, conf.int=F, pval=TRUE)
ggsave('survival_TP53_in_BRCA_TCGA.png')
沒差
參考來(lái)源:生信技能樹
友情鏈接:
課程分享
生信技能樹全球公益巡講
(https://mp.weixin.qq.com/s/E9ykuIbc-2Ja9HOY0bn_6g)
B站公益74小時(shí)生信工程師教學(xué)視頻合輯
(https://mp.weixin.qq.com/s/IyFK7l_WBAiUgqQi8O7Hxw)
招學(xué)徒:
(https://mp.weixin.qq.com/s/KgbilzXnFjbKKunuw7NVfw)
歡迎關(guān)注公眾號(hào):青島生信菜鳥團(tuán)