RE: Re: Plot Joined Intelligently

*To*: mathgroup at smc.vnet.net*Subject*: [mg30527] RE: [mg30520] Re: Plot Joined Intelligently*From*: "David Park" <djmp at earthlink.net>*Date*: Sat, 25 Aug 2001 01:15:09 -0400 (EDT)*Sender*: owner-wri-mathgroup at wolfram.com

Tony, Sure, just don't let WRI trick you into thinking you need ListPlot. (You don't really need the MultipleListPlot command either, but the PlotSymbol and MakeSymbol commands from the package are quite nice.) Needs["Graphics`MultipleListPlot`"] Needs["Graphics`Colors`"] data = Table[{x, Sin[x]}, {x, 0, \[Pi], \[Pi]/30}]; Show[Graphics[{AbsolutePointSize[4], Point /@ data, Blue, Line[data]}], Frame -> True, PlotLabel -> "Who Needs ListPlot?", ImageSize -> 500]; Show[Graphics[{AbsolutePointSize[4], PlotSymbol[Star, 5] /@ data, Blue, Line[data]}], Frame -> True, PlotLabel -> "Who Needs ListPlot?", ImageSize -> 500]; David Park djmp at earthlink.net http://home.earthlink.net/~djmp/ > From: aes [mailto:siegman at stanford.edu] To: mathgroup at smc.vnet.net > > > And while this subject is on the table, is there a way to get PlotJoined > *with the plots also shown as points or symbols*? >