sentencizer: fixed actorsDetail coding error

4 years ago · ec8afc4990
parent 9ccfd2952e
commit ec8afc4990
1 changed files with 1 additions and 1 deletions
--- a/R/sentencizer.R
+++ b/R/sentencizer.R
@ -63,7 +63,7 @@ sentencizer <- function(out, sent_dict = NULL, localhost = NULL, validation = F)

    ### Unnest out_row to individual actor ids

-    if("_source.computerCodes.actorsDetail2" %in% colnames(out)) {
+    if("_source.computerCodes.actorsDetail" %in% colnames(out)) {
      out <- out %>%
        unnest(`_source.computerCodes.actorsDetail`) %>%
        # mutate(ids_list = ids) %>%