Re: 3D curve spline
- To: mathgroup at smc.vnet.net
- Subject: [mg84589] Re: 3D curve spline
- From: Narasimham <mathma18 at hotmail.com>
- Date: Sun, 6 Jan 2008 05:51:52 -0500 (EST)
- References: <flk22a$bok$1@smc.vnet.net> <flnjoa$k0v$1@smc.vnet.net>
On Jan 5, 2:47 pm, Jens-Peer Kuska <ku... at informatik.uni-leipzig.de> wrote: > Hi, > > I don't know what "re-order m equal interval points" may be, > but. Here are some data: > > data = Table[{Cos[t], Sin[t], t}, {t, 0, 4 Pi, Pi/16.}]; Thanks. (Euclidean) distances between successive points of the given data are unequal and after re-ordering they are uniformly spaced along the required arc. For example, 5 random 3D points length to origin ascending between (0,1) and lying in the first octant, required to be joined by a continuous line. Regards > Here is the interpolation: > ip = Interpolation /@ Transpose[data]; > > and here is a plot of the interpolation > > ParametricPlot3D[Evaluate[#[t] & /@ ip], {t, 1, 65}] > > And you ca re-tabulate it with > > Table[#[t] & /@ ip,{t,1,65,0.00000001}] > > Regards > Jens > > Narasimham wrote: > > I have n points along a 3-D curved line. How to re-order m equal > > interval points by splines? TIA.