nb_row <- 120
chromosome <- rep(1, nb_row)
index1 <- sample(1:100, nb_row, replace = TRUE)
index2 <- sample(1:100, nb_row, replace = TRUE)
m <- data.frame("mat_1" = sample(1:500, nb_row, replace = TRUE),
"mat_2" = sample(1:500, nb_row, replace = TRUE),
"mat_3" = sample(1:500, nb_row, replace = TRUE),
"mat_4" = sample(1:500, nb_row, replace = TRUE))
mat <- cbind(chromosome, index1, index2, m)
normalizeCount(mat)
Run the code above in your browser using DataLab