Services & Resources / Wolfram Forums
-----
 /
MathGroup Archive
2007
*January
*February
*March
*April
*May
*June
*July
*August
*September
*October
*Archive Index
*Ask about this page
*Print this page
*Give us feedback
*Sign up for the Wolfram Insider

MathGroup Archive 2007

[Date Index] [Thread Index] [Author Index]

Search the Archive

Re: Can an arrow be drawn on a 3D plot?

  • To: mathgroup at smc.vnet.net
  • Subject: [mg81311] Re: Can an arrow be drawn on a 3D plot?
  • From: dh <dh at metrohm.ch>
  • Date: Wed, 19 Sep 2007 05:21:15 -0400 (EDT)
  • References: <fcnkbv$rqc$1@smc.vnet.net>


Hy,

as far as I know does Arrow not work in 3D Graphics. But you may still 

draw an arrow by "hand" using the Line directive. Of coarse this is a 

clumsy way, but at least you get a picture:

f[z_]:=z;

iSurface=ParametricPlot3D[{Re[z],Im[z],Im[f[z]]}/.z->r*Exp[I*t],{r,0,5},{t,-Pi,Pi},PlotStyle->Red];

traceC1=ParametricPlot3D[{Re[z],Im[z],Im[f[z]]}/.z->2*Exp[I*t],{t,0,2*Pi},PlotStyle->{Darker[Green],Thickness[0.004]}];

Show[{iSurface,traceC1,Graphics3D[{Thickness[0.01],Line[{{2,0,0},{2,3,3},.7{2,3,3},{2,3,3},{2.7,1.8,2}}]}]},PlotRange->{{-7,7},{-7,7},{-7,7}},BoxRatios->{1,1,1},ImageSize->{500,500}]

If you want to darw many arrows, you can make a function that creates them.

hope this helps, Daniel



chuck009 wrote:

> The code below draws a surface and a contour over that surface.  I'd like to show the direction of the contour with arrows.  Looks like Arrow only works in 2D.  Any way to draw an arrow lying on a 3-D surface?  Ideally, I'd like to place say 2 arrows on the green contour on the red surface showing the direction (of integration).

> 

> f[z_] := z; 

> iSurface = ParametricPlot3D[

>        {Re[z], Im[z], Im[f[z]]} /. 

>          z -> r*Exp[I*t], {r, 0, 5}, 

>        {t, -Pi, Pi}, PlotStyle -> Red]; 

> traceC1 = ParametricPlot3D[

>        {Re[z], Im[z], Im[f[z]]} /. 

>          z -> 2*Exp[I*t], {t, 0, 2*Pi}, 

>        PlotStyle -> {Darker[Green], 

>            Thickness[0.004]}]; 

> Show[{iSurface, traceC1}, PlotRange -> 

>      {{-7, 7}, {-7, 7}, {-7, 7}}, 

>    BoxRatios -> {1, 1, 1}, ImageSize -> 

>      {500, 500}]

> 




  • Prev by Date: DatabaseLink behaviour change in 6.0
  • Next by Date: Re: MachinePrecission and FPU
  • Previous by thread: Re: Can an arrow be drawn on a 3D plot?
  • Next by thread: Re: Can an arrow be drawn on a 3D plot?