Accessory function to generate access point according to operating-machine area.
Usage
genaccesspts(
topography,
machinepolygons,
maintrails,
advancedloggingparameters = loggingparameters()
)Arguments
- topography
Digital terrain model (DTM) of the inventoried plot (LiDAR or SRTM) (
DTMParacou) (RasterLayer with a crs in UTM)- machinepolygons
Accessible zones for machines of the inventoried plot (default:
harvestableareadefinition) (sf polygons data.frame)- maintrails
Main trails defined at the entire harvestable area (sf linestring with a crs in UTM)
- advancedloggingparameters
Other parameters of the logging simulator
loggingparameters(list)
Value
list of 2 elements :
PartMainTrails available area to draw access points of maintrail for each PU (prospection unit) (sf or sfc)
AccessPointAll a draw of access points of maintrail for each PU (prospection unit) (sf or sfc)
Examples
if (FALSE) { # \dontrun{
set.seed(1)
data(MainTrails)
data(HarvestableAreaOutputsCable)
data(DTMParacou)
accesspts <- genaccesspts(topography = DTMParacou,
machinepolygons = HarvestableAreaOutputsCable$MachinePolygons,
maintrails = MainTrails,
advancedloggingparameters = loggingparameters())
} # }