pneuvial / c3co

Inferring cancer cell clonality from copy-number data
5 stars 1 forks source link

ROBUSTNESS: Add explicit 'stringsAsFactors' arguments [rbind] #78

Open HenrikBengtsson opened 4 years ago

HenrikBengtsson commented 4 years ago

deleted

HenrikBengtsson commented 4 years ago

cbind() is irrelevant, which leaves us with:

$ pkg=c3co; echo "$pkg:"; (cd "$pkg"; grep -E "^[ \t]*[^#].*rbind" -- */*.R | grep -vF stringsAsFactors;)
c3co:
R/alignLoci.R:        res[[ii]] <- rbind(res[[ii]], dat_cc[[ii]])
R/AllGenerics.R:        df.CHR <- do.call(rbind, args=dfList)
R/buildSubclones.R:        ss <- rbind(ssAB, ssAA, ssBB)
R/fitC3co.R:            allConfig <- rbind(allConfig, aConf)
R/fitC3co.R:          bestConfigp <- rbind(bestConfigp, bestConfig)
R/fitC3co.R:          bestConfigp <- rbind(bestConfigp, NA)
R/get.Zt.R:  X1.Z <- rbind(0, colCumsums(Z))
R/heatmap.3.R:        lmat <- rbind(4:3, 2:1)
R/heatmap.3.R:            lmat <- rbind(lmat[1, ] + 1, c(NA_real_, 1), lmat[2, ] + 1)
R/heatmap.3.R:            image(x=rbind(1:nr), col = RowSideColors[rowInd], axes = FALSE)
R/positiveFusedLasso.R:    W <- get.W(Zt = do.call(rbind, args = Zt), Y = do.call(cbind, args = Yc))
R/PSCBSwrapper.R:        df <- do.call(rbind, args=lapply(chr, FUN=function(cc) {
R/segmentData.R:            Y <- rbind(Y, binDatTCNwithoutNA)
R/segmentData.R:            DH <- rbind(DH, binDatDHwithoutNA)
R/segmentData.R:            Y <- rbind(Y, binDatTCNwithoutNA)