if (FALSE) {
# Get Area bearing for Apples in Washington, 2012.
params <- list(
commodity_desc = "APPLES",
year = "2012",
state_name = "WASHINGTON",
agg_level_desc = "STATE"
)
area <- nassqs_acres(params, area = "AREA BEARING")
head(area)
}
Run the code above in your browser using DataLab