| Author |
Comment/Response |
Bill
|
 09/11/08 5:46pm
Hi:
When I run the following code,
Clear[r]
r = Raster[
Table[i, {i, 100}, {j, 100}], {Scaled[{0, 0}], Scaled[{1, 1}]}, {1, 100},
ColorFunction -> "NeonColors"];
ParametricPlot3D[{Cos[\[Phi]] Sin[\[Theta]], Sin[\[Phi]] Sin[\[Theta]],
Cos[\[Theta]]}, {\[Phi], 0, 3 Pi/2}, {\[Theta], 0, Pi},
MeshStyle -> Opacity[0.1],
PlotStyle -> FaceForm[Directive[Opacity[0.5], Yellow], Cyan], AxesLabel -> {"X", "Y", "Z"},
ImageSize -> 700, Prolog -> r]
the back ground colors don't cover the plot completely. How do I get the back ground colors to cover the entire plot?
Thanks,
Bill
PS. I'm using Mathematica 6.0.1 with Windows XP on a PC.
URL: , |
|
