RE: List of Interpolated functions inside plot
- To: mathgroup at smc.vnet.net
- Subject: [mg24856] RE: [mg24831] List of Interpolated functions inside plot
- From: "David Park" <djmp at earthlink.net>
- Date: Wed, 16 Aug 2000 03:24:16 -0400 (EDT)
- Sender: owner-wri-mathgroup at wolfram.com
Dear Chris,
Plot[ Table[xyinterp[m][x], {m, 1, 10, 3}] // Evaluate, {x, -5, 5} ];
David Park
djmp at earthlink.net
http://home.earthlink.net/~djmp/
> -----Original Message-----
> From: Krautschik, Chris G [mailto:krautschikc at intel.co.jp]
To: mathgroup at smc.vnet.net
>
> If have defined the following interpolation for arbitrary integer m:
>
> xyinterp[m_] := Interpolation[Table[{x, Sin[m x]}, {x, -5, 5, 0.25}]];
>
> I can plot a number of the interpolated functions on one plot as follows:
>
> Plot[ {xyinterp[1][x], xyinterp[2][x], xyinterp[3][x]}, {x,-5,5} ];
>
> Let's say I want to plot a large number of the functions of
> integer m but I
> like to use the Table command since typing can become quite tedious:
>
> Then
>
> Plot[ Table[xyinterp[m][x], {m, 1, 10, 3}],{x,-5,5} ]
>
> doesn't work because the value of x needs to be defined pior to the
> execution of the Table command. I have tried various forms of
> Hold but that
> doesn't seem to work.
>
> Any help or suggestions on how to make this work would be appreciated.
>
> thanks,
> Chris
>