
Extract topsoil thickness from ABARES's 'Soil Thickness for Australian Areas of Intensive Agriculture of Layer 1' data
Source:R/extract_topsoil_thickness.R
extract_topsoil_thickness.RdExtracts the soil thickness for Australian areas of intensive Agriculture of Layer 1 (A Horizon - top-soil) (derived from soil mapping) at the GPS points provided, assuming that they are land-based coordinates in Australia from the Soil Thickness for Australian Areas of Intensive Agriculture of Layer 1 data set on a 0.01 X 0.01 arc-degree quadrat.
Arguments
- xy
A
listordata.frameobject with names containing pairings of longitude and latitude values expressed as decimal degree values in that order. Adata.framemay also be an sf points object. See Details for more.- locations
The column in which the location names are located as an
Integervalue. Defaults to1.- lonlat
A
vectorofintegervalues indicating the column index in which the longitude and latitude values are contained. Defaults to2:3.
Value
A data.table::data.table with the provided GPS
coordinates and the respective soil thickness data (mm) as an Integer
value of the soil layer 1 from Soil Thickness for Australian Areas of
Intensive Agriculture of Layer 1 and coordinates from the Soil Thickness
("thpk_1_longitude" and "thpk_1_latitude").
xy
xy as a List Object
If xy is a list object, each individual vector's items should be named
“x” (longitude) and “y” (latitude), respectively. The list
item names should be descriptive of the individual vectors and will be
included in a “location” column of the output.
xy as a Data Frame Object
If xy is a data.frame, it should be a three column object with the first
column being the location name, the second longitude and the third,
latitude both as decimal degrees in numeric format.
xy as an sf Object
If xy is an sf object, it should only be point geometry. If the
data are projected, they will be reprojected to "EPSG:4326", Geographic
Coordinate System WGS 84 before the extraction.
Examples
locs <- list(
"Merredin" = c(x = 118.28, y = -31.48),
"Corrigin" = c(x = 117.87, y = -32.33),
"Tamworth" = c(x = 150.84, y = -31.07)
)
extract_topsoil_thickness(xy = locs)
#> location x y thpk_1 thpk_x thpk_y
#> <char> <num> <num> <int> <num> <num>
#> 1: Corrigin 117.87 -32.33 202 117.87 -32.33
#> 2: Merredin 118.28 -31.48 150 118.28 -31.48
#> 3: Tamworth 150.84 -31.07 150 150.84 -31.07