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: [mg46068] Re: Difference of numbers in the list
  • From: drbob at bigfoot.com (Bobby R. Treat)
  • Date: Thu, 5 Feb 2004 04:02:49 -0500 (EST)
  • References: <bvaor9$a3g$1@smc.vnet.net> <bvfvnk$qdk$1@smc.vnet.net> <bvl92n$t7e$1@smc.vnet.net> <bvpb5p$se5$1@smc.vnet.net>
  • Sender: owner-wri-mathgroup at wolfram.com

This works (taken from the e-mail I was responding to at the time,
with the PlotStyle added):

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}],
  PlotStyle -> PointSize[0.02]]

Bobby

mtmtk2003 at yahoo.com (mtmtk) wrote in message news:<bvpb5p$se5$1 at smc.vnet.net>...
> Where do you put the options in 
> 
> ListPlot[Take[A, {1, 16, 2}] - Take[A, {2, 16, 2}]]
> 
> maybe I can try that to see if it still gives an error message.
> 
> drbob at bigfoot.com (Bobby R. Treat) wrote in message news:<bvl92n$t7e$1 at smc.vnet.net>...
> > Both versions take plot options at my machine (Mathematica 5.0.1). Or at
> > least, they both take the PlotStyle option you used in the second one.
> > The points look different, though... the second version seems to have
> > larger points, even though the specified PointSize is the same.
> > 
> > Hmm....
> > 
> > Bobby


  • Prev by Date: InputAutoReplacements With "-marks
  • Next by Date: Re: simplifying first-order diff eq solution
  • Previous by thread: Re: Difference of numbers in the list
  • Next by thread: GrayLevel GIF Export.