# NOT RUN {
aw_query('Fluazinam', type = 'commonname')
out <- aw_query(c('Fluazinam', 'Diclofop'), type = 'com')
out
# extract subactivity from object
sapply(out, function(y) y$subactivity[1])
# use CAS-numbers
aw_query("79622-59-6", type = 'cas')
# }
Run the code above in your browser using DataLab