MathGroup Archive 2005

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

Search the Archive

Intersection of coordinate axes in origin (3d plot)


Hi!

Is there a way to produce "cross"-style axes (hence which intersect in
the origin [0,0,0]) in 3d-plots?
Since this doesn't seem to implemented in standard-Mathematica, I thought
of combining Line[]'s with the actual plot. But this doesn't work.
Concretely:

<<Graphics'ParametricPlot3D';

Plot_px=SphericalPlot3D[(Abs[SphericalHarmonicY[1,1,theta,phi]])**2,
	{theta,0,Pi},{phi,0,2*Pi}];
grd=Graphics3D[Line[{{-1,0,0},{1,0,0}}]];

Show[{grd,Plot_px}];

results in:

"Show::gcomb: An error was encountered in combining the graphics objects
in Show[{-Graphics3D-,Plot_px}]

In this spirit
With thanks in advance
Yours Gernot


  • Prev by Date: Re: Exporting xhtml+mathml
  • Next by Date: Re: Taking the Log causing Mathematica kernel crash.
  • Previous by thread: Re: Hold problems with FindRoot
  • Next by thread: Re: Intersection of coordinate axes in origin (3d plot)