[Date Index]
[Thread Index]
[Author Index]
Re: Re: Changing "point" styles in 3D plots
*To*: mathgroup at smc.vnet.net
*Subject*: [mg79840] Re: [mg79803] Re: Changing "point" styles in 3D plots
*From*: Murray Eisenberg <murray at math.umass.edu>
*Date*: Mon, 6 Aug 2007 03:40:44 -0400 (EDT)
*Organization*: Mathematics & Statistics, Univ. of Mass./Amherst
*References*: <200708050849.EAA22417@smc.vnet.net>
*Reply-to*: murray at math.umass.edu
Or, in Mathematica 6, where StyleForm gets replaced by Style; the part
"FontSize-> of the option are not needed; and with a termnal semicolon
after the ParametericPlot3D expression you don't see an extra Graphics3D
display before the final one:
point1 = Graphics3D[
Text[Style["X", 14], {3*Cos[3*(Pi/2)], 3*Sin[3*(Pi/2)], 2}]];
p1 = ParametricPlot3D[{3*Cos[t], 3*Sin[t], 2}, {t, 0, 2*Pi}];
Show[{p1, point1}]
Even with those changes, is the letter X really where it should be, from
an appearance consideration? You have to use some trial and error,
perhaps, to get it right.
Another way is to convert the 3D graphics to 2D graphics (by means
previously posted in this newsgroup), then use the 2D Drawing Tools to
place the letter visually.
Which brings up a question: When using the Text Tool from the 2D Drawing
Tools, is there some way to change the font properties except by means
of the Option Inspector? (Surely it ought to be on the 2D Graphics
Inspector that opens from the 2D Drawing Tools palette.)
chuck009 wrote:
> Here's an option for placing letters at points on a ParametricPlot3D. I just create the graphics primitive. In the case below, it's a Graphics3D text object.
>
> point1 = Graphics3D[Text[StyleForm["X", FontSize -> 14],
> {3*Cos[3*(Pi/2)], 3*Sin[3*(Pi/2)], 2}]];
> p1 = ParametricPlot3D[{3*Cos[t], 3*Sin[t], 2}, {t, 0, 2*Pi}]
> Show[{p1, point1}]
>
--
Murray Eisenberg murray at math.umass.edu
Mathematics & Statistics Dept.
Lederle Graduate Research Tower phone 413 549-1020 (H)
University of Massachusetts 413 545-2859 (W)
710 North Pleasant Street fax 413 545-1801
Amherst, MA 01003-9305
Prev by Date:
**Re: Solving differential equations with parameters**
Next by Date:
**Re: Nested Dialogs**
Previous by thread:
**Re: Changing "point" styles in 3D plots**
Next by thread:
**Re: Changing "point" styles in 3D plots**
| |