# HG changeset patch # User davidvanzessen # Date 1444832310 14400 # Node ID c89d9e89423b2edae196e3c7e2fb53d3eb496af4 # Parent 43ce3ebfc9b574807c680197bdecffc81e82098f Uploaded diff -r 43ce3ebfc9b5 -r c89d9e89423b RScript.r --- a/RScript.r Tue Oct 13 09:20:16 2015 -0400 +++ b/RScript.r Wed Oct 14 10:18:30 2015 -0400 @@ -67,7 +67,8 @@ patient.merge.list = list() #cache the 'both' table, 2x speedup for more memory... patient.merge.list.second = list() -cat(paste("
", patient, " row ", 1:nrow(tmp.rows), " | ", tmp.rows$Sample, ": | ", tmp.rows$Clone_Sequence, " | ", tmp.rows$normalized_read_count, " |
", patient, " row ", 1:nrow(tmp.rows), " | ", tmp.rows$Sample, ": | ", tmp.rows$Clone_Sequence, " | ", tmp.rows$normalized_read_count, " |
", patient, " row ", 1:nrow(tmp.rows), " | ", tmp.rows$Sample, ": | ", tmp.rows$Clone_Sequence, " | ", tmp.rows$normalized_read_count, " |
", patient, ": ", nrow(first.rows), " ", nrow(second.rows), " ", first.clone.sequence, " |