Consider a "curve" defined by a list of points in finite dimension (here, four):
pts = Table[{Cos[t], 0, Sin[2 t], Sin[t]}, {t, Subdivide[0, 1, 99]}] I used known functions to generate pts but of course I am not supposed to know the parametric equation of the curve they belong to.
What would be a good approach to compute the local curvature? Several possibilities I thought of:
- interpolating
ptsand usingArcCurvature(introduced in Mathematica 10) - using $n+1$ consecutive points (where $n$ is the dimension), fit the circle that passes through them: that's the osculating circle, whose radius is the opposite of the curvature.
Ideally, the solution should not be too sensitive to noise...
