Mercurial > repos > deepakjadmin > mayatool1_test1
diff condition.R @ 1:b27fcd214692 draft default tip
Uploaded
author | deepakjadmin |
---|---|
date | Tue, 20 Sep 2016 12:35:33 -0400 |
parents | af08995fd952 |
children |
line wrap: on
line diff
--- a/condition.R Wed Jan 20 05:17:11 2016 -0500 +++ b/condition.R Tue Sep 20 12:35:33 2016 -0400 @@ -10,10 +10,9 @@ compound <- rownames(refined) refined <- cbind(compound,refined) } else if((arg4 == "Inactive") ){ -#refined <- asd[asd[,1] <= as.numeric(arg2),] refined <- asd[asd[,2] >= as.numeric(arg3) & asd[,2] <= as.numeric(arg2),] compound <- rownames(refined) -refined <- cbind(compound,refined)} -###write.table(dw,file=args3,row.names=FALSE,sep="\t") +refined <- cbind(compound,refined) +} write.table(refined,file=arg5,row.names=FALSE,sep="\t")