Re: ScaledListPlot
- To: mathgroup at smc.vnet.net
- Subject: [mg9448] Re: [mg9438] ScaledListPlot
- From: jpk at max.mpae.gwdg.de
- Date: Thu, 6 Nov 1997 02:39:57 -0500
- Sender: owner-wri-mathgroup at wolfram.com
> From hans.steffani at e-technik.tu-chemnitz.de Wed Nov 5 12:48:12 1997 > Date: Wed, 5 Nov 1997 01:56:56 -0500 > From: hans.steffani at e-technik.tu-chemnitz.de (Hans Steffani) To: mathgroup at smc.vnet.net > To: mathgroup at smc.vnet.net > Subject: [mg9448] [mg9438] ScaledListPlot > > The ListPlot option PlotJoined allows you to join the points by lines. I > need an option which connects two points by two lines which are > parallel to the coordinate axes. > > Is such tool available? > > Hans Friedrich Steffani > -- > Hans Friedrich Steffani > Institut fuer Elektrische Maschinen und Antriebe, TU Chemnitz > mailto:hans.steffani at e-technik.tu-chemnitz.de > http://www.tu-chemnitz.de/~hfst/ > Hi Hans, do You mean (with data=Table[{x,Sin[x]},{x,0,Pi,Pi/10}];) this Show[ Graphics[ Line /@ Rest[Transpose[{data,RotateRight[data]}]] /. Line[{{x1_,y1_},{x2_,y2_}}] :> Line[{{x1,y1},{x2,y1},{x2,y2}}], Axes->True ] ] ? With edges below the lines? Jens