Re: List of lists in MultipleListPlot

*To*: mathgroup at smc.vnet.net*Subject*: [mg9052] Re: [mg8936] List of lists in MultipleListPlot*From*: John JOWETT <John.Jowett at cern.ch>*Date*: Thu, 9 Oct 1997 01:42:31 -0400*Organization*: CERN*Sender*: owner-wri-mathgroup at wolfram.com

The following answer certainly works. However it may not be obvious what to do when you want to use options of MultipleListPlot. The technique is to construct an appropriate pure function out of MultipleListPlot, e.g., d1 = Table[{x,Sin[x]},{x,0,10,.2}]; d2 = Table[{x,Cos[x]},{x,0,10,.2}]; MultipleListPlot[d1,d2,Background->RGBColor[1,.5,.5]] > At 22:08 4-10-97 -0400, Niklas Blomberg wrote: > >Dear all, > > > >I would like to plot a list of lists with MultipleListPlot but the function > >only accepts > >individual lists as arguments ie: > > > >lists={{{1,1},{2,2}},{{2,1},{2,2}}}; > >Now MultipleListPlot[lists[[1]],lists[[2]]] works fine but is cumbersome with > >many lists. > > > >What I would like to do of course is to plot "lists" directly - Flatten and > >Map do not do the trick so are > >there any suggestions? W. Meeussen wrote: > > why resort to ...list[[n]]... if the Apply function does it for you? > > Apply[ MultipleListPlot, lists ] > or > MultipleListPlot @@ lists > > remember that Apply (@@) overwrites the outer Head of its argument: > > p @@ q[r] gives q[r] -- ------------------------------------------------------------------------- ** Electronic mail: <John.Jowett at cern.ch> World Wide Web: http://wwwslap.cern.ch/~jowett/ Telephone: +41 (0)22 76 76643 (direct line and voice mail) Postal address: SL Division, CERN, CH-1211 Geneva 23, Switzerland Fax: +41 (0)22 76 78480 Location: Room 1-D18,Building 865, CERN Prevessin Site, France Secretaries: +41 (0)22 76 75272 or 75875 or 74571 -------------------------------------------------------------------------