GetCDLComp | R Documentation |
A function that requests data on land cover changes over time from the CropScape. This function implements the GetCDLComp service provided by the CropScape https://nassgeodata.gmu.edu/CropScape.
GetCDLComp( aoi, year1, year2, type, mat = TRUE, crs = NULL, tol_time = 20, manual_try = TRUE )
aoi |
Area of interest. Can be a 5-digit FIPS code of a county, 2-digit FIPS code of a state, four corner points or an sf object that defines a rectangle (or a box) area, multiple coordinates that defines a polygon, or a URL of an compressed ESRI shapefile. |
year1 |
Year 1. Should be a 4-digit numeric value. |
year2 |
Year 2. Should be a 4-digit numeric value. |
type |
Type of the selected AOI. 'f' for state or county, 'b' for box area, 'ps' for polygon, 's' for ESRI shapefile. |
mat |
|
crs |
Coordinate system. |
tol_time |
Number of seconds to wait for a response until giving up. Default is 20 seconds. |
manual_try |
|
Land cover changes are obtained by first merging two raster files in two different years (year1 and year 2) together based on the geographic coordinates, and then count
the number of pixels (or grids) by types of land cover changes, such as corn to soybeans. The process is done in the CropScape server (the default option) or inside the GetDataComp
function.
To obtain land cover chaneg data, the raster objects in two different years must have the same spatial resolutions and identical coordinates to be directly merged together.
The CropScape server does internal checks on this and would report an error if the two rasters cannot be directly merged together due to unequal spatial resolution or different
coordinates. However, the GetCDLComp
function allows users to obtain land cover changes from two raster files that have different resolutions. This is achieved by resample the raster
data using the nearest neighbor resampling technique such that both rasters have the same resolutions (the finer resolution raster is downscaled to lower resolution).
Then, the resampled data are processed automatically to get data on land cover changes (this is done by using the manualrotate
function).
This feature is useful when dealing with the rasters in 2006 and 2007, which are at 56-meter resolution. While the rasters in other years are at 30-meter resolution.
Also note that the resampling process will lead to sampling errors. Whenever the manual calculation of land cover changes is used, a warning message will show up to alert users.
If without warning, the data are directly from the CropScape GetCDLComp service.
In rare cases, the CropScape server fails to generate land cover change data even without the issue of unequal spatial resolution. A common issue is mismatch in data sizes: the raster objects in two years
have different pixel numbers. It is unclear that why this would happen. Nevertheless, when there is data mismatch, the GetCDLComp
function will attempt to calculate for land cover change
manually using the manual_rotate
function. Data associated with the unmatched coordinates are
discarded at the merging process. Again, a warning message will show up to alert users if manual_rotate
function is used. If no coordinates can be matched, the
manual_rotate
function would also fail to get land cover change data. In this case, a warning message will show up to alert users.
The usage of this function is similar to the GetCDLData
function. Please see the help page of the GetCDLData
function
for details. Note that the aoi
cannot be a single point here.
The function returns a data table or a raster file.
# Example 1. Retrieve data for the Champaign county in Illinois (FIPS = 17109) in 2017-2018. data <- GetCDLComp(aoi = '17019', year1 = 2017, year2 = 2018, type = 'f') head(data, 5) # Example 2. Retrieve data for a polygon (a triangle) defined by three coordinates in 2017-2018. aoi <- c(175207,2219600,175207,2235525,213693,2219600) data <- GetCDLComp(aoi = aoi, year1 = 2017, year2 = 2018, type = 'ps') head(data, 5) # Example 3. Retrieve data for a rectangle box defined by four corner points in 2018. data <- GetCDLComp(aoi = c(130783,2203171,153923,2217961), year1 = 2017, year2 = 2018, type = 'b') head(data, 5)
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.