install.packages(“glmnet”)
library(glmnet)
library(survival)
setwd(“C:\Users\TD\Desktop”)
inputfile=“id0.05exp.txt”
lncRNA<-read.table(inputfile,header=T,sep="\t",row.names = 1,check.names = F,stringsAsFactors = F)
set.seed(123456)
v1<-as.matrix(lncRNA[,c(3:ncol(lncRNA))])
v2 <- as.matrix(Surv(lncRNA S u r v i v a l m o n t h s , l n c R N A Survival_months,lncRNA Survivalmon
glmnet包做线性回归
最新推荐文章于 2024-01-08 11:00:09 发布