Re: Difference of numbers in the list
- To: mathgroup at smc.vnet.net
- Subject: [mg45961] Re: Difference of numbers in the list
- From: mtmtk2003 at yahoo.com (mtmtk)
- Date: Sat, 31 Jan 2004 05:20:25 -0500 (EST)
- References: <bvaor9$a3g$1@smc.vnet.net>
- Sender: owner-wri-mathgroup at wolfram.com
Thanks to everybody who helped.
I also tried the following and it works, but it won't let me use any plot options.
A = Flatten[Table[{((6.67/10^8)*157.85)/
(0.225 - x)^2, (Pi^2/420^2)*x},
{x, 0., 0.007245, 0.001}]];
ListPlot[Take[A, {1, 16, 2}] -
Take[A, {2, 16, 2}]]
But if I use one Take[] I can put the PlotStyle:
ListPlot[Take[A, {2, 16, 2}],
PlotStyle -> PointSize[0.02]]