untwist_sec: Remove self-intersections from one section of a contour
In IceCast: Apply Statistical Post-Processing to Improve Sea Ice Predictions

Description Usage Arguments Value Examples

Function to correct self-intersections in a section of a line.

1	untwist_sec(line, tol = 0, eps = 0.25)

`line`	N x 2 matrix of coordinates
`tol`	how much of a difference between the original line and the simplified line is allowed
`eps`	how much to increase `tol` by on each iteration

n x 2 matrix of the new coordinates with self-intersections removed

par(mfrow = c(1, 2))
plot(currSecEx, type = "l", main = "Original Line Section", xlab = "", ylab = "")
new_sec <- untwist_sec(currSecEx)
plot(new_sec, type = "l", main = "New Line Section", xlab = "", ylab =  "")