Services & Resources / Wolfram Forums
-----
 /
MathGroup Archive
2004
*January
*February
*March
*April
*May
*June
*July
*August
*September
*October
*November
*December
*Archive Index
*Ask about this page
*Print this page
*Give us feedback
*Sign up for the Wolfram Insider

MathGroup Archive 2004

[Date Index] [Thread Index] [Author Index]

Search the Archive

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]]


  • Prev by Date: Defining a function in module problem?
  • Next by Date: How to make the Mathematica Kernel return DisplayPackets?
  • Previous by thread: RE: Difference of numbers in the list
  • Next by thread: NonlinearFit not reaching convergence, even after spoon-feeding it with initial parameters.