# NOT RUN {
# Get all assignee-level fields for the patents endpoint:
fields <- get_fields(endpoint = "patents", groups = "assignees")
#...Then pass to search_pv:
# }
# NOT RUN {
search_pv(
query = '{"_gte":{"patent_date":"2007-01-04"}}',
fields = fields
)
# }
# NOT RUN {
# Get all patent and assignee-level fields for the patents endpoint:
fields <- get_fields(endpoint = "patents", groups = c("assignees", "patents"))
# }
# NOT RUN {
#...Then pass to search_pv:
search_pv(
query = '{"_gte":{"patent_date":"2007-01-04"}}',
fields = fields
)
# }
# NOT RUN {
# }
Run the code above in your browser using DataLab