how to rotate text in 2-D graphics?
- To: mathgroup at smc.vnet.net
- Subject: [mg33240] how to rotate text in 2-D graphics?
- From: Harald von der Osten-Woldenburg <hvdosten at lb.netic.de>
- Date: Sat, 9 Mar 2002 18:05:29 -0500 (EST)
- Organization: LF.net GmbH, Stuttgart, Germany
- Sender: owner-wri-mathgroup at wolfram.com
Hi,
if I combine several curves in one plot I need to put some text next to
the curves. To avoid that the horizontal text intersects several curves
I would like to rotate the text at specific different angles. I searched
with groups.google.com but didn't find any answer. Anyhow, is it
possible?
Up to now I am using
pict1 = ListPlot[data1, PlotJoined -> True, PlotStyle ->
{Thickness[0.0025]},
FrameStyle -> {Thickness[0.004]}, Frame -> True,
FrameTicks -> {obenunten, rechtslinks, obenunten, rechtslinks},
FrameLabel -> {" ..... ", "....."}, RotateLabel -> True,
PlotRange -> {{0., 2.001}, {.1, .7001}}, GridLines -> Automatic,
AspectRatio -> .5, ImageSize -> {550, 400},
DefaultFont -> {"Times-Bold", 14}, FormatType -> OutputForm,
Epilog -> {Text["200 MHz", {0.23, 0.63}],
Text["v = 0.04 m / nsec", {1.55, 0.35}], Text["v = 0.10 m / nsec",
{1.23, 0.63 }]}]
:
:
:
pict6 = ListPlot[data6,....]
ois = Show[pict1,......,pict6]
Thanxs a lot for any help
Harry
--
Harald von der Osten-Woldenburg
Geophysical Prospection of Archaeological Sites
National Heritage Department of Baden-Wuerttemberg
Silberburgstrasse 193, D-70178 Stuttgart
Fax Office: +49-(0)711-1694-707
http://www.lb.netic.de/hvdosten : Geomagnetics, Geoelectrics, Radar, EMI