query_gen_actors: only retrieve ud field from source

4 years ago · 0e593075ee
parent 6eb405f8bd
commit 0e593075ee
1 changed files with 2 additions and 1 deletions
--- a/R/query_gen_actors.R
+++ b/R/query_gen_actors.R
@ -15,7 +15,8 @@
 #################################################################################################
 query_gen_actors <- function(actor, country, pre_tags, post_tags) {
  generator <- function(country, startdate, enddate, querystring, pre_tags, post_tags, actorid) {
-    return(paste0('{"query":
+    return(paste0('{"_source": ["ud"],
+    "query":
                    {"bool": {
                      "filter":[
                        {"term":{"country":"',country,'"}},