Re: using of Table
- To: mathgroup at smc.vnet.net
- Subject: [mg38930] Re: using of Table
- From: "Steve Luttrell" <luttrell at _removemefirst_westmal.demon.co.uk>
- Date: Mon, 20 Jan 2003 00:45:27 -0500 (EST)
- References: <b0dd9m$i5s$1@smc.vnet.net>
- Sender: owner-wri-mathgroup at wolfram.com
The following code fragment will plot the points for you:
a = {2, 3, 5};
c = {3, 5, 3};
t = {-1, 3, 5};
x = Table[a*k + b*c + v*t, {k, 1, 2}, {b, 1, 2}, {v, 1, 2}];
Show[Graphics3D[{PointSize[0.03],Map[Point,Flatten[x,2]]}]];
The Flatten[x,2] part of this is the list that you want.
--
Steve Luttrell
West Malvern, UK
"yaw" <asare at vt.edu> wrote in message news:b0dd9m$i5s$1 at smc.vnet.net...
> a={2,3,5}
> c={3,5,3}
> t={-1,3,5}
> I am using Table[a*k+b*c+v*t,{k,1,2},{b,1,2},{v,1,2}]
> to generate some points. After this I need to plot the points by using 3D
> commands like Scatter3DPlot.
> How can I get the points from Table in the form of a list so that I can
plot
> them?.
> Thank u!
>
>
>