st_temporaryintersection: st_temporaryintersection

In VincyaneBadouard/LoggingLab: An R Package to Simulate Forest Logging

st_temporaryintersection

Description

st_temporaryintersection

Usage

st_temporaryintersection(
  topography,
  plotmask,
  treebuffers,
  advancedloggingparameters = loggingparameters()
)

Arguments

topography	Digital terrain model (DTM) of the inventoried plot (LiDAR or SRTM) (DTMParacou) (RasterLayer with a crs in UTM)
plotmask	Inventoried plot mask (SpatialPolygonsDataFrame with a crs in UTM)
treebuffers	Polygons vector
advancedloggingparameters	Other parameters of the logging simulator loggingparameters (list)

Value

sf_Polygons

Examples

## Not run: 
data(Paracou6_2016)
data(DTMParacou)
data(PlotMask)
data(SpeciesCriteria)
data(ForestZoneVolumeParametersTable)
data(HarvestableAreaOutputsCable)
data(MainTrails)

inventory <- addtreedim(cleaninventory(Paracou6_2016, PlotMask),
volumeparameters = ForestZoneVolumeParametersTable)

treeselectionoutputs <- suppressWarnings(treeselection(
  inventory,
  topography = DTMParacou,
  speciescriteria = SpeciesCriteria,
  scenario = "manual", objective = 20,
  fuel = "0",
  diversification = FALSE,
  winching = "0",
  specieslax = FALSE, objectivelax = TRUE,
  harvestablearea = HarvestableAreaOutputsCable$HarvestableArea,
  plotslope = HarvestableAreaOutputsCable$PlotSlope,
  harvestablepolygons = HarvestableAreaOutputsCable$HarvestablePolygons,
  maintrails = MainTrails,
  advancedloggingparameters = loggingparameters()))

treebuffers <- treeselectionoutputs$SelectedTreesPoints %>% sf::st_buffer(40)

st_temporaryintersection(DTMParacou, PlotMask, treebuffers)

## End(Not run)

VincyaneBadouard/LoggingLab documentation built on Oct. 16, 2024, 9:42 p.m.