show data.table result after using ':='

mlr-org · Oct 17, 2024 · f2ccbda · f2ccbda
1 parent 1eef6c6
commit f2ccbda
Showing 1 changed file with 1 addition and 1 deletion.
diff --git a/R/voting_methods.R b/R/voting_methods.R
@@ -73,5 +73,5 @@ seq_phragmen_rule = function(voters, candidates, weights, committee_size = NULL)
 add_borda_score = function(dt, n = NULL) {
   if (is.null(n)) n = nrow(dt)
   borda_score = NULL # silence data.table note: "no visible global binding"
-  dt[, borda_score := if (nrow(dt) == 1) 1 else (n - .I) / (n - 1)]
+  dt[, borda_score := if (nrow(dt) == 1) 1 else (n - .I) / (n - 1)][]
 }