RE: export plot data
- To: mathgroup at smc.vnet.net
- Subject: [mg47918] RE: [mg47884] export plot data
- From: "David Park" <djmp at earthlink.net>
- Date: Fri, 30 Apr 2004 19:26:56 -0400 (EDT)
- Sender: owner-wri-mathgroup at wolfram.com
Quentin,
An example:
plot1 = Plot[Sin[x], {x, 0, 2Pi}];
The primitive graphics for the curve is in
First[plot1]
You could extract the points that Mathematica used by
First@Cases[plot1, Line[points_] -> points, Infinity]
David Park
djmp at earthlink.net
http://home.earthlink.net/~djmp/
From: grimal [mailto:grimal at univ-paris12.fr]
To: mathgroup at smc.vnet.net
Dear list members,
I have developed a Mathematica notebook with a Plot command at the end.
The evaluation of Plot[f,{x,xmin,xmax}] involves a function f that is
defined in the notebook; xmin and xmax are also functions defined in the
notebook and evaluated while doing the Plot.
I am satisfied with the result of the Plot command.
Now, I would like to export in a txt file the data (list of points)
generated during the evaluation of the Plot. Then I could use the list
of points to plot the data with another software.
I have tried the Table command to generate a list but it does not seem
to work.
Can anybody help me?
Thanks
Quentin Grimal