This function evaluates whatever code you pass to it in the environment of
the qry_funs list. This allows you to cut down on typing when
writing your queries. If you want to cut down on typing even more, you can
try assigning the qry_funs list into your global environment
with: list2env(qry_funs, envir = globalenv()).
with_qfuns(code)
| code | Code to evaluate. See example. |
|---|
The result of code - i.e., your query.
# Without with_qfuns, we have to do: qry_funs$and( qry_funs$gte(patent_date = "2007-01-01"), qry_funs$text_phrase(patent_abstract = c("computer program")), qry_funs$or( qry_funs$eq(inventor_last_name = "ihaka"), qry_funs$eq(inventor_first_name = "chris") ) )#> {"_and":[{"_gte":{"patent_date":"2007-01-01"}},{"_text_phrase":{"patent_abstract":"computer program"}},{"_or":[{"_eq":{"inventor_last_name":"ihaka"}},{"_eq":{"inventor_first_name":"chris"}}]}]}#...With it, this becomes: with_qfuns( and( gte(patent_date = "2007-01-01"), text_phrase(patent_abstract = c("computer program")), or( eq(inventor_last_name = "ihaka"), eq(inventor_first_name = "chris") ) ) )#> {"_and":[{"_gte":{"patent_date":"2007-01-01"}},{"_text_phrase":{"patent_abstract":"computer program"}},{"_or":[{"_eq":{"inventor_last_name":"ihaka"}},{"_eq":{"inventor_first_name":"chris"}}]}]}