Mathematica 9 is now available
Services & Resources / Wolfram Forums
-----
 /
MathGroup Archive
2000
*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 2000

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

Search the Archive

Re: Saving plotted data as ASCII text data ?

  • To: mathgroup at smc.vnet.net
  • Subject: [mg21985] Re: Saving plotted data as ASCII text data ?
  • From: "Allan Hayes" <hay at haystack.demon.co.uk>
  • Date: Thu, 10 Feb 2000 02:25:29 -0500 (EST)
  • References: <87b0l3$o52@smc.vnet.net>
  • Sender: owner-wri-mathgroup at wolfram.com

Odo,


gr = Plot[Sin[x], {x, 0, 7}]


Cases[gr, Line[data_] :> data, Infinity][[1]]

Infinity tells Cases to look at all levels. [[1]] takes the first, and here
only, member from the list of results.

Allan
---------------------
Allan Hayes
Mathematica Training and Consulting
Leicester UK
www.haystack.demon.co.uk
hay at haystack.demon.co.uk
Voice: +44 (0)116 271 4198
Fax: +44 (0)870 164 0565


"Udo Huebner" <udo.huebner at ptb.de> wrote in message
news:87b0l3$o52 at smc.vnet.net...
> Hello,
>
> I need to manipulate plotted data in other programs, i.e. the curve data
> as
> numerical data. OpenWrite["file"] and Write[...] could make the output,
> I think, but how to get the data of the curves itself which I could
> "Write"?
>
> Sorry, if my question is naive but I am not very skilled in Mathematica
> and I hope for help.
>
> Regards Udo
>



  • Prev by Date: ASCII Exportation of InterpolatingFunction
  • Next by Date: Re: MathLink MLGetRealArray
  • Previous by thread: Re: Saving plotted data as ASCII text data ?
  • Next by thread: numeric inverse laplace transform of numeric data