akmedoids (version 0.1.5)

elbowPoint: Determine the elbow point on a curve

Description

Given a list of x, y coordinates on a curve, function determines the elbow point of the curve.

Usage

elbowPoint(x, y)

Arguments

x

vector of x coordinates of points on the curve

y

vector of y coordinates of points on the curve

Value

an x, y coordinates of the elbow point.

Details

highlight the maximum curvature to identify the elbow point (credit: 'github.com/agentlans')

Examples

# NOT RUN {
# Generate some curve
x <- runif(100, min=-2, max=3)
y <- -exp(-x) * (1+rnorm(100)/3)
plot(x, y)
# Plot elbow points
abline(v=elbowPoint(x,y)$y, col="blue", pch=20, cex=3)
# }