R/DistancePointSegment.R

In stmueller/pathmapping: Compute Deviation and Correspondence Between Spatial Paths

Defines functions DistancePointSegment

Documented in DistancePointSegment

DistancePointSegment <-
function(px,py,x1,y1,x2,y2)
  {
    closest <- ClosestPoint(px,py,x1,y1,x2,y2)
    dist <- LineMagnitude(px, py, closest[[1]],closest[[2]])
    dist
}