pathway_name = rownames(g1)
tm <- list('P-value' = c(), 'Pathway_name' = c())
for(i in 1:dim(g1)[1]){
    results<- t.test(g1[i,],g2[i,])$p.value
    print(results)
    tm$`P-value`<-append(tm$`P-value`,results)
    tm$Pathway_name<- append(tm$Pathway_name,pathway_name[i])
}


dftm<- data.frame(tm)
dftm <- dftm[sort(dftm$P.value,index.return=TRUE)$ix,]   #按照某一个字段排序
1 data  #dataframe对象 含有v1,v2两列
2 
3 data[sort(data$v1,index.return=TRUE)$ix,]  #对data的数据按v1排列,v1须为numeric  as.numeric()

 

相关文章:

  • 2022-01-24
  • 2021-07-31
  • 2021-12-14
猜你喜欢
  • 2022-02-20
  • 2022-12-23
  • 2021-10-27
  • 2021-06-19
相关资源
相似解决方案