Re: Extracting data points from Plot[]
- To: mathgroup at christensen.cybernetics.net
- Subject: [mg824] Re: [mg773] Extracting data points from Plot[]
- From: Allan Hayes <hay at haystack.demon.co.uk>
- Date: Mon, 24 Apr 1995 02:48:10 -0400
Jon Guyer asked if we can get the list of point coordinates used by
Plot without using Plot.
I don't know how; but we can avoid some overheads.
In[1]:=
pl = Plot[{x^2},{x,0,2},DisplayFunction -> Identity];
In[2]:=
coordinates = pl[[1,1,1,1,1]];
If more data is needed about the plot try the following -- I won't
show the long outputs.
In[3]:=
FullGraphics[pl][[1]];
and
In[4]:=
FullOptions[pl];
The latter can be limited to particular options:
In[5]:=
FullOptions[pl, PlotRange]
Out[5]=
{{-0.05, 2.05}, {-0.1, 4.1}}
In[6]:=
FullOptions[pl,{PlotRange, AspectRatio}]
Out[6]=
{{{-0.05, 2.05}, {-0.1, 4.1}}, 0.618034}
Allan Hayes
hay at haystack.demon.co.uk