| Author |
Comment/Response |
Sinval Santos
|
10/10/01 07:29am
Plot of the point p1={1,1,1}:
P1=Show[Graphics3D[{PointSize[0.04],Point[{1,1,1}]}]];
Plot of the sphere: c1={4 Sin[u] Cos[t], 4 Sin[u] Sin[t], 4 Cos[u]}
C1= ParametricPlot3D[{4 Sin[u] Cos[t], 4 Sin[u] Sin[t], 4 Cos[u]},{u,0,Pi},{t,0,2 Pi},Shading->False];
To show the point and the together sphere:
Show[C1,P1] ;
The sphere hides the point.
Is it possible to show the transparent sphere?
For the point to appear?
URL: , |
|