actor_merger: dont deselect sent_words and sent_sum columns

4 years ago · 1c14646e8f
parent 9bd382f955
commit 1c14646e8f
1 changed files with 1 additions and 1 deletions
--- a/R/actor_merger.R
+++ b/R/actor_merger.R
@ -58,7 +58,7 @@ actor_merger <- function(df, actors_meta, actor_groups = NULL) {
      (.SD),
      sent_words = 0,
      sent_sum = 0
-    ),.SDcols = -c('sent_words','sent_sum')]
+    )]
  }

  ## Unnest to sentence level