Re: listplot and notebook directory
- To: mathgroup at smc.vnet.net
- Subject: [mg15383] Re: listplot and notebook directory
- From: "Allan Hayes" <hay at haystack.demon.co.uk>
- Date: Tue, 12 Jan 1999 03:14:46 -0500
- References: <779bkt$b7o@smc.vnet.net>
- Sender: owner-wri-mathgroup at wolfram.com
Maarten:
>1. LISTPLOT
At present, ListPlot will not show points and lines together Here is one
way round - you could build this into a function ListPlotPL with two
extra options LineStyle and PointStyle.
Show[Block[{$DisplayFunction=Identity},ListPlot[{0,2,4,9,16,25},#]&/@
{
{PlotJoined -> True,PlotStyle->{Thickness[.01],Hue[2/3]}
},
{PlotStyle->{PointSize[0.05], Hue[0]}}
}
],
PlotRange->All,Frame->True
];
>2. NOTEBOOK DIRECTORY
The following might help
DirectoryName[ToFileName["FileName"/.NotebookInformation[SelectedNotebook[]]
]]
"C:\\WINDOWS\\Desktop\\"
Allan
---------------------
Allan Hayes
Mathematica Training and Consulting
www.haystack.demon.co.uk
hay at haystack.demon.co.uk
Voice: +44 (0)116 271 4198
Fax: +44 (0)870 164 0565
Maarten.vanderBurgt at icos.be wrote in message <779bkt$b7o at smc.vnet.net>...
>Hello,
>
>I have two unrelated questions:
>
>1. LISTPLOT
>
>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]"?
>
>
>2. NOTEBOOK DIRECTORY
>
>Is there a command which gives the directory where the current notebook
>resides?
>
>You get the notebook directory -- which can be some network directory
>different from the local directory where Mathematica is located -- with
>$InitialDirectory when you start Mathematica by double clicking on the
>notebook file in Explorer (Windows). However, when Mathematica is
>launched from the programs menu and you open the same notebook from the
>File menu, $InitialDirectory gives the Mathematica directory. Is there
>a command which also in the latter case gives the path to the notebook?
>I did not find anything in the book. 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.
>
>
>Thanks for any help
>
>Maarten van der Burgt
>
>Icos Vision Systems
>Leuven
>Belgium
>
>