Re: Creating graph with only a view data points
- To: mathgroup at smc.vnet.net
- Subject: [mg28991] Re: Creating graph with only a view data points
- From: Jens-Peer Kuska <kuska at informatik.uni-leipzig.de>
- Date: Thu, 24 May 2001 04:07:09 -0400 (EDT)
- Organization: Universitaet Leipzig
- References: <9dqdf2$4j7@smc.vnet.net> <9dta7t$f60@smc.vnet.net> <ogFN6.9155$dl4.27332@ralph.vnet.net>
- Sender: owner-wri-mathgroup at wolfram.com
Hi,
you must make two parametric functions
x[t] and y[t]
makeParmetricInterpolation[data:{_,_}]:=
Module[{n=Length[data]-1,tlist},
tlist=MapIndexed[{First[#2-1]/n,#1} &,data];
{Interpolation[tlist /. {t_?NumericQ,x_,_}:> {t,x}],
Interpolation[tlist /. {t_?NumericQ,_,y_}:> {t,y}]}
]
and now you can draw a parametric curve with t in [0,1]
Regards
Jens
Oliver Tonn wrote:
>
> First of all thanks for your help.
> I'm sorry, but your solution don't work in my case.
> It could happen, that I have to go back on the x and y axis.
> For example:
>
> {{0,0},{1,0.5},{2,0.5},{3,0.5},{2.1,1.5},{1,5}}
>
> Mathematica isn't realy happy with that.
>
> Do you, or anybody else, have a solution for that?
>
> Greetings Oliver