# NOT RUN {
# Fails because no TOKEN is included
token <- '<YOUR-SECURITY-TOKEN>'
csid <- get_csid("Triclosan", token = token)
cs_compinfo(csid, token)
csids <- get_csid(c('Aspirin', 'Triclosan'), token = token)
cs_compinfo(csids, token = token)
# }
Run the code above in your browser using DataLab