MathGroup Archive 2004

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

Search the Archive

Re: Difference of numbers in the list

  • To: mathgroup at
  • Subject: [mg45961] Re: Difference of numbers in the list
  • From: mtmtk2003 at (mtmtk)
  • Date: Sat, 31 Jan 2004 05:20:25 -0500 (EST)
  • References: <bvaor9$a3g$>
  • Sender: owner-wri-mathgroup at

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.