Re: listplot and notebook directory
- To: mathgroup at smc.vnet.net
- Subject: [mg15388] Re: listplot and notebook directory
- From: Paul Abbott <paul at physics.uwa.edu.au>
- Date: Tue, 12 Jan 1999 03:14:51 -0500
- Organization: University of Western Australia
- References: <779bkt$b7o@smc.vnet.net>
- Sender: owner-wri-mathgroup at wolfram.com
Maarten.vanderBurgt at icos.be wrote: > When I execute the following command the result is a listplot where the > data points ares fairly big filled black circles. > In[1]:= ListPlot[{0,2,4,9,16,25},PlotStyle->PointSize[0.05]] > > The following gives a plot where the data points are joined by a line. > In[2]:= ListPlot[{0,2,4,9,16,25},PlotJoined -> True] > > With the following I would expect the combination of the two. It does > however give the same results as In[2]: the > "PlotStyle->PointSize[0.05]" options doesn't seem to have any effect > here. Is this intended behaviour or is this a bug? > In[3]:= ListPlot[{0,2,4,9,16,25},PlotJoined -> True, > PlotStyle->PointSize[0.05]] > > Is there a way you can have both options "PlotJoined -> True" and > "PlotStyle->PointSize[0.05]"? One way is to use Epilog. In[1]:= data = {0, 2, 4, 9, 16, 25}; In[2]:= ListPlot[data, PlotJoined -> True, Epilog -> {PointSize[0.05], ListPlot[data, DisplayFunction -> Identity][[1]]}]; You are effectively producing two plots and merging them. Alternatively, you can "extend" your data: In[3]:= data = Transpose[{Table[i, {i, Length[data]}], data}]; In[4]:= ListPlot[data, PlotJoined -> True, Epilog -> {PointSize[0.05], Point /@ data}]; > Is there a command which gives the directory where the current notebook > resides? NotebookInformation[SelectedNotebook[]] gives you the information you want. > This would be very usefull when > you want to read in data from an ascii file which sits in the same > directory as the notebook file. It would make moving the whole > directory much easier: you would not have to retype a fairly long > network directory path. Related to your request, if you do a search on "notebook directory" at DejaNews <http://www.dejanews.com/> under news:comp.soft-sys.math.mathematica, you will find the posting by P.J. Hinton on 98/08/19 entitled Re: first usage of a button. You can access this directly at the following URL http://x15.dejanews.com/getdoc.xp?AN=382536764&CONTEXT=916040102.1348337715&hitnum=1 Cheers, Paul ____________________________________________________________________ Paul Abbott Phone: +61-8-9380-2734 Department of Physics Fax: +61-8-9380-1014 The University of Western Australia Nedlands WA 6907 mailto:paul at physics.uwa.edu.au AUSTRALIA http://www.physics.uwa.edu.au/~paul God IS a weakly left-handed dice player ____________________________________________________________________