# pass in as an R list
args <- list(name = "b1",
competitors = list(name = "c1", requests = list(query = list(match = "a*"))))
benchmark(index="shakespeare", query=args)
# or pass in as json query with newlines, easy to read
aggs <- '{
"name": "b1",
"competitors": [ {
"name": "c1",
"requests": [ {
"query": {
"match": { "_all": "a*" }
}
} ]
} ]
}'
benchmark(query=aggs)
# or pass in collapsed json string
aggs <- '{"aggs":{"stats":{"terms":{"field":"text_entry"}}}}'
es_search_body(index="shakespeare", query=aggs)
# match query
match <- '{"query": {"match" : {"text_entry" : "Two Gentlemen"}}}'
es_search_body(index="shakespeare", query=match)
# multi-match (multiple fields that is) query
mmatch <- '{"query": {"multi_match" : {"query" : "henry","fields":["text_entry","play_name"]}}}'
es_search_body(index="shakespeare", query=mmatch)
# bool query
mmatch <- '{
"query": {
"bool" : {
"must_not" : {
"range" : {
"speech_number" : {
"from" : 1, "to": 5
}}}}}}'
Run the code above in your browser using DataLab