Previous changeset 2:7ffd0fba8cf4 (2017-09-18) Next changeset 4:89d80f086328 (2017-09-25) |
Commit message:
Uploaded |
modified:
RScript.r |
b |
diff -r 7ffd0fba8cf4 -r 20f0df3721aa RScript.r --- 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")) |