# \donttest{
# Get corn code
corn_codes <- get_comprehensive_cdl_codes("corn")
print(corn_codes) # Should be 1
# Get all grain crop codes
grain_codes <- get_comprehensive_cdl_codes("grains")
print(grain_codes) # Should be vector of grain codes
# See available crop types (this will print to console)
get_comprehensive_cdl_codes("help")
# }
Run the code above in your browser using DataLab