rm erroneous line

kcotto · kcotto · commit dbd0f20d1e79 · 2020-01-02T22:13:49.000-06:00
diff --git a/scripts/compare_junctions_hist_v2.R b/scripts/compare_junctions_hist_v2.R
@@ -158,7 +158,7 @@ a <- function(x, y, z){
   return(x)
 }
 x <- mapply(a, regtools_data$norm_scores_non, length(all_samples), regtools_data$samples)
-x = split(x, rep(1:ncol(x), each = nrow(x)))
+# x = split(x, rep(1:ncol(x), each = nrow(x)))
 regtools_data$norm_scores_non = x
 print("test7")
 

Original file line number	Diff line number	Diff line change
`@@ -158,7 +158,7 @@ a <- function(x, y, z){`
`158`	`158`	`return(x)`
`159`	`159`	`}`
`160`	`160`	`x <- mapply(a, regtools_data$norm_scores_non, length(all_samples), regtools_data$samples)`
`161`		`-x = split(x, rep(1:ncol(x), each = nrow(x)))`
	`161`	`+# x = split(x, rep(1:ncol(x), each = nrow(x)))`
`162`	`162`	`regtools_data$norm_scores_non = x`
`163`	`163`	`print("test7")`
`164`	`164`