set_position: Set animal position elevation

View source: R/set_position.R

set_positionR Documentation

Set animal position elevation

Description

Updates the elevation of the user defined animal position based on the nearest ground point. The updated elevation correspond to the user defined elevation + the elevation of the nearest ground point.

Usage

set_position(data, position)

Arguments

data

@param data LAS class object containing the xyz coordinates of a 3D point cloud classified as ground and non-ground points.

position

vector of length 3 containing the xyz coordinates of the animal location. Default = c(0,0,0).

Value

A vector of length 3 containing the updated position.

Examples


#- import the tree_line_plot dataset
file <- system.file("extdata", "tree_line_plot.laz", package="viewshed3d")
tls <- lidR::readLAS(file)

center <- c(0,0,2) # defines the scene center for the entire process
angle <- 1 # defines the angular resolution for the entire process

#- remove noise to avoid visibility estimates error
tls_clean <- viewshed3d::denoise_scene(tls,method="sd",
                                       filter=6)


#- class ground and vegetation points
class <- lidR::classify_ground(tls_clean, lidR::csf(rigidness = 1L,
                                                 class_threshold = 0.2,
                                                 sloop_smooth = FALSE))

new_position <- viewshed3d::set_position(class,center)

# input position
center
# updated position
new_position


Blecigne/viewshed3d documentation built on Nov. 5, 2022, 9:08 p.m.