Mercurial > repos > davidvanzessen > prisca
diff RScript.r @ 3:20f0df3721aa draft
Uploaded
author | davidvanzessen |
---|---|
date | Mon, 25 Sep 2017 08:07:11 -0400 |
parents | 7ffd0fba8cf4 |
children | 89d80f086328 |
line wrap: on
line diff
--- a/RScript.r Mon Sep 18 09:01:19 2017 -0400 +++ b/RScript.r Mon Sep 25 08:07:11 2017 -0400 @@ -112,7 +112,6 @@ onx = paste(on, ".x", sep="") ony = paste(on, ".y", sep="") splt = split(x, x$Sample, drop=T) - print(splt) type="pair" if(length(splt) == 1){ print(paste(paste(x[1,which(colnames(x) == "Patient")]), "has one sample"))