fix line wrap issue

Bioconductor · Oct 17, 2024 · cb4b19c · cb4b19c
1 parent 821bc8f
commit cb4b19c
Showing 1 changed file with 2 additions and 1 deletion.
diff --git a/R/letterFrequency.R b/R/letterFrequency.R
@@ -795,7 +795,8 @@ setMethod("consensusMatrix", "XStringSet",
             removeUnused <- FALSE
         }
         if(length(x) == 0){
-            ans <- matrix(ifelse(as.prob, 0, 0L), nrow=0, ncol=ifelse(removeUnused, 0, length(codes)))
+            ans <- matrix(ifelse(as.prob, 0, 0L), nrow=0,
+                          ncol=ifelse(removeUnused, 0, length(codes)))
             if(!removeUnused) colnames(ans) <- names(codes)
         } else {
             ans <- .Call2("XStringSet_consensus_matrix",