# \donttest{
# Query Apple's, GM's, and BTI's market cap and revenues
data('firms_US')
query.firms(firms_US, which = c('cap', 'rev'))
# Query GM's and BTI's management
data('firms_US')
query.firms(firms_US, which = 'man')
# Query Appple's and GM's revenues and currency
data('firms_US')
list2env(firms_US, envir = parent.frame())
query.firms(AAPL, GM, which = c('rev', 'curr'))
# }
Run the code above in your browser using DataLab