       Re: Thanks to all for the help - and a roadie question....

• To: mathgroup at smc.vnet.net
• Subject: [mg33207] Re: [mg33192] Thanks to all for the help - and a roadie question....
• From: BobHanlon at aol.com
• Date: Sat, 9 Mar 2002 03:19:21 -0500 (EST)
• Sender: owner-wri-mathgroup at wolfram.com

```In a message dated 3/7/02 4:43:16 AM, rob at piovere.com writes:

>I can reach out and grab a piece of a 1 dimensional list to plot by
>ListPlot[ Take[ list, {m,n} ]  ]     this plots list from entries m to
>n.
>
>How do you do this with a 2 dimensional array so I can plot whatever section
>of the data I want?
>Example, if
>2list = { {x1,y1}, {x2,y2}.....{xn,yn} }
>
>How do I use Take[] or an equivalent to select a section of this list to
>plot?

var[x_Symbol, n_Integer] :=

ToExpression[ToString[x]<>ToString[n]];

Clear[x,y,n];

data=Table[{var[x,n],var[y,n]}, {n,10}];

Take[data, {5,7}]

{{x5, y5}, {x6, y6}, {x7, y7}}

data = Table[{200z,Sin[z]},{z,0,3,.1}];

ListPlot[data, PlotJoined -> True];

ListPlot[Take[data, {11,26}],

PlotRange->{{0,600},{0,1.025}},

PlotJoined -> True];

Bob Hanlon
Chantilly, VA  USA

```

• Prev by Date: Ma. 3.0.0, Linux, keyboard problem
• Next by Date: A Question about Mathematica Sessions....!
• Previous by thread: Re: Thanks to all for the help - and a roadie question....
• Next by thread: Re: Thanks to all for the help - and a roadie question....