classify_wires: Classify wire

In Jean-Romain/lidRplugins: Extra functions and algorithms for lidR package

Classify wire

Description

Classify wires using the output of track_wires. Using wire profiles and some knowledge on the geometry of the towers it creates a cloth below the wires and classifies everything that is above this cloth will be classifies a wire exept the transmission towers. This the transmission tower classification must be performed first.

Usage

classify_wires(las, wires, dtm)

Arguments

las	An object of class LAS.
wires	A SpatialPointsDataFrame returned by track_wires
dtm	A RasterLayer. The digital terrain model is need to get the relative elevations

References

Roussel J, Achim A, Auty D. 2021. Classification of high-voltage power line structures in low density ALS data acquired over broad non-urban areas. PeerJ Computer Science 7:e672 https://doi.org/10.7717/peerj-cs.672

See Also

Other electrical network: classify_transmissiontowers(), get_tower_spec(), track_wires()

Examples

# A simple file with wires already clipped from 4 files + shapefile
# of the network
LASfile <- system.file("extdata", "wires.laz", package="lidRplugins")
wireshp <- system.file("extdata", "wires.shp", package="lidRplugins")
dtmtif  <- system.file("extdata", "wire-dtm.tif", package="lidRplugins")
las <- readLAS(LASfile, select = "xyzc")
network <- sf::st_read(wireshp)
dtm <- raster::raster(dtmtif)

towers <- find_transmissiontowers(las, network, dtm, "waist-type")
las <- classify_transmissiontowers(las, towers, dtm)
wires <- track_wires(towers, network, dtm, "waist-type")
las <- classify_wires(las, wires, dtm)

plot(las, color = "Classification")

Jean-Romain/lidRplugins documentation built on Feb. 8, 2023, 5:39 a.m.