Re: ListPlot the output of Print
- To: mathgroup at smc.vnet.net
- Subject: [mg4462] Re: ListPlot the output of Print
- From: rubin at msu.edu (Paul A. Rubin)
- Date: Mon, 29 Jul 1996 02:37:18 -0400
- Organization: Michigan State University
- Sender: owner-wri-mathgroup at wolfram.com
In article <4shubo$g7n at ralph.vnet.net>, Mike at utk.edu (Mike) wrote: ->MathGroupers: Well, at least you didn't call us "MathGroupies" ... :-) ->How can I easily render the output of a print statement to ListPlot without ->the cut & paste routine. ->Example: -> ->Do [ Print[ N[ {x,Sin[x]} ] ] , {x,0,2Pi,Pi/6}] -> ->{0, 0} ->{0.523599, 0.5} ->{1.0472, 0.866025} ->{1.5708, 1.} ->{2.0944, 0.866025} ->{2.61799, 0.5} ->{3.14159, 0} ->{3.66519, -0.5} ->{4.18879, -0.866025} ->{4.71239, -1.} ->{5.23599, -0.866025} ->{5.75959, -0.5} ->{6.28319, 0} -> ->I don't want to use Table[] because I need to monitor the output as they get ->printed.Sin[x] is just a simple example, the real function is much more ->complicated. ->Any help would be appreciated. In[]:= y = {}; Do [ Print[z = N[ {x,Sin[x]} ]; AppendTo[y, z]; z ] , {x,0,2Pi,Pi/6}] ListPlot[y] Paul ************************************************************************** * Paul A. Rubin Phone: (517) 432-3509 * * Department of Management Fax: (517) 432-1111 * * Eli Broad Graduate School of Management Net: RUBIN at MSU.EDU * * Michigan State University * * East Lansing, MI 48824-1122 (USA) * ************************************************************************** Mathematicians are like Frenchmen: whenever you say something to them, they translate it into their own language, and at once it is something entirely different. J. W. v. GOETHE ==== [MESSAGE SEPARATOR] ====