Commit 97b9022c authored by Menglin Zheng's avatar Menglin Zheng
Browse files

Update SiPer_pipeline.R

parent df62be55
......@@ -108,6 +108,7 @@ if(num<=100){
num<-length(which(JSD_re$JSD_val!=1))
}
JSD_re_final<-JSD_re[1:num,]
JSD_re_final<-JSD_re_final[which(JSD_re_final$JSD_val!=1),] #only consider JSD_val<1
write_xlsx(JSD_re_final,'../output/Predicted_signaling_protein.xlsx')
## performing ORA on predicted signalling proteins
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment