change sequencing 1:N to use seq_along

montilab · Jun 5, 2023 · 3e83492 · 3e83492
1 parent 008d229
commit 3e83492
Showing 1 changed file with 1 addition and 1 deletion.
diff --git a/R/cadra_functions.R b/R/cadra_functions.R
@@ -366,7 +366,7 @@ generate_permutations <- function(
   # Create permutation matrix
   perm <- matrix(NA, nrow=n_perm, ncol=n)
   colnames(perm) <- names(input_score)
-  rownames(perm) <- 1:n_perm
+  rownames(perm) <- seq_along(n_perm)
 
   # Sample the input scores
   for(i in seq_len(n_perm)){