
Re: Getting the plotted data from a graph
Posted:
Jun 16, 2013 5:11 AM


g1 = Plot[Sin[x], {x, Pi, Pi}, Frame > True, FrameLabel > {"x", "y"}, ImageSize > 2.6*72]
g1Pts = Cases[g1, Line[pts_] :> pts, Infinity];
g2 = ListLinePlot[g1Pts, Frame > True, FrameLabel > {"x", "y"}, ImageSize > 2.6*72]
You can directly access the associated Part of g1; however, the specific Part (position of Line) varies between plot types; whereas, locating the Line with Cases works the same.
g1Pts == List @@ g1[[1, 1, 3, 2]] == Cases[g2, Line[pts_] :> pts, Infinity] == List @@ g2[[1, 2, 1, 3, 3]]
True
Bob Hanlon
On Sat, Jun 15, 2013 at 4:24 AM, Lily T. <econactually@gmail.com> wrote:
> Dear All, > > My question is regarding the plotted data points in a graph. Assume you > draw a graph of sinx as: > > g1 = Plot[Sin[x], {x, Pi, Pi}, > Frame > True, FrameLabel > {"x", "y"}, ImageSize > 2.6*72 > ] > > then how can I get all of the data points of this graph by using > mathematica? > > This is really important for me and I couldn't find the answer anywhere > online! > > Thank you for your help in advance! > > Best, > Lily > >

