| ... | ... |
@@ -156,7 +156,7 @@ setMethod("computeDEGs", "TranslatomeDataset",
|
| 156 | 156 |
function(x) mean(x[which(cond.2.vector == 1)],na.rm=TRUE) - |
| 157 | 157 |
mean(x[which(cond.2.vector == 0)],na.rm=TRUE)) |
| 158 | 158 |
if (object@data.type == "ngs") |
| 159 |
- FC <- apply(cond.2, 1, |
|
| 159 |
+ FC2 <- apply(cond.2, 1, |
|
| 160 | 160 |
function(x) log(mean(x[which(cond.2.vector == 1)],na.rm=TRUE) / |
| 161 | 161 |
mean(x[which(cond.2.vector == 0)],na.rm=TRUE),base=2)) |
| 162 | 162 |
avg.trt2 <- apply(cond.2, 1, |
