R/verticalSplit.R

In jmt2080ad/polylineSplitter: Split lines into segments

verticalSplit <- function(spobj, xdist, start = T){
  stop("not implemented")
    'for all x coordinates
         if x value == split value
             then split y == y value
         if next x value is greater than split value and current x value is less than y value
             then get slope of line between both two x values
             caculate y split value at the x split value'
}