diff --git a/R/computeDiffInCounts.R b/R/computeDiffInCounts.R index 10a3beb..210ecdb 100644 --- a/R/computeDiffInCounts.R +++ b/R/computeDiffInCounts.R @@ -13,5 +13,5 @@ computeDiffInCounts <- function(rows, max_noalle, nloci, data) { diffInCounts[element] <- diffInCounts[element] + 1 } } - return(diffInCounts) + return(as.matrix(diffInCounts)) }