How can I make a scopus API KEY query requesting data given an affiliation and a given year, example: imagine I want all the papers Scopus has by researchers affiliated to Google on the year 2003. I have the following code in R (but it is not working):
library(rscopus)
api_key <- 'MY_API_KEY'
set_api_key(api_key)
google2 <- scopus_search(api_key ='MY_API_KEY', query = "affil(google inc) AND YEAR(2001)", count=1)