Re: Output Table Format Change

*To*: mathgroup at smc.vnet.net*Subject*: [mg66672] Re: [mg66652] Output Table Format Change*From*: Bob Hanlon <hanlonr at cox.net>*Date*: Sat, 27 May 2006 03:50:37 -0400 (EDT)*Reply-to*: hanlonr at cox.net*Sender*: owner-wri-mathgroup at wolfram.com

tbl = Table[ N[ {Sin[u+v],Cos[u-v]}],{u,0, Pi,Pi/6},{v,0, Pi,Pi/6}]; Use Flatten; however, you probably don't want the resulting transitions included. ListPlot[Flatten[tbl,1],PlotJoined->True, AspectRatio->Automatic]; You can use MultipleListPlot or overlay the individual ListPlots Needs["Graphics`"]; MultipleListPlot[tbl,PlotJoined->True, AspectRatio->Automatic,PlotStyle->{Black}]; DisplayTogether[ ListPlot[#,PlotJoined->True, AspectRatio->Automatic]&/@tbl]; Bob Hanlon ---- Narasimham <mathma18 at hotmail.com> wrote: > Is there a command for removal of brackets automatically from > output ? > > tbl = Table[ N[ {Sin[u+v],Cos[u-v]}],{u,0, Pi,Pi/6},{v,0, Pi,Pi/6}] ; > > ListPlot[tb,PlotJoined->True,AspectRatio->Automatic]; > > tb is same as tbl from which extra curly brackets { } are manually > removed. (tbl output is deleted here). > > Thanks in advance. > -- Bob Hanlon hanlonr at cox.net