0
$\begingroup$

I'm trying to make use of the function DensityPlot3D with the following specific example

DensityPlot3D[14.48 2.718^(2 Im[ArcTan[x,y]]) Abs[(Sqrt[x^2+y^2] SphericalBesselJ[1,7.72 Sqrt[x^2+y^2+z^2]])/Sqrt[x^2+y^2+z^2]]^2,{x,-1,1}, {y,-1,1},{z,-1,1},PlotLegends->Automatic,PlotRange->Automatic,PlotPoints->200]

from which I obtain (in the Mathematica notebook) a very opaque plot in gray as in this image:

enter image description here

Is this normal? If not, what am I missing? How could I obtain a plot like the one in the first answer of this question?

I also tried copying and pasting exactly the same code in that first answer, and I get a plot with the same problem: "completely gray".

However, if a save the plot as .pdf (right click -> Save Graphic As...) the plot reappears "magically" much better:

enter image description here

I'm using Mathematica 12.0 Student Edition.

Improve this question
$\endgroup$
8
  • $\begingroup$ The OpacityFunction is assigning too much opacity I think. Try making that have a stronger cutoff. Admittedly, though, I don't see your base issue generally. One worth trying might be like: OpacityFunction -> (Which[# > .25, #/2, # > .1, .1, True, 0] &) $\endgroup$
    – b3m2a1
    May 3, 2019 at 6:24
  • $\begingroup$ @b3m2a1 Thanks, I'll try other things. Your last command it didn't work either; I've tried even with a simpler function, namely Sqrt[x^2 + y^2 + z^2] and the plot is still awful. $\endgroup$
    – SNC92
    May 3, 2019 at 17:32
  • $\begingroup$ this is an apparent bug in 12.0. I am using mmka on MacOSX and getting grey boxes even for the examples in mmka help for DensityPlot3D. $\endgroup$
    – bronxy
    Jul 27, 2019 at 22:37
  • $\begingroup$ @bronxy Which example? The ones I tried work fine in 12.0 on MacOS. $\endgroup$
    – Rohit Namjoshi
    Jul 27, 2019 at 23:25
  • 1
    $\begingroup$ Please report this to [email protected], including the results of SystemInformation[] and details about your computer's OS version and hardware specs. $\endgroup$
    – Brett Champion
    Jul 29, 2019 at 4:34

1 Answer 1

Reset to default
-1
$\begingroup$

I had a similar problem (and a bunch of others) on mmka 12.0. Reseting the Mathematica subsystem, i.e., deleting all the mmka created folders in ~/Library, has solved this problem. Apparently something went wrong when upgrading from the previous version.

Improve this answer
$\endgroup$

Your Answer

By clicking “Post Your Answer”, you agree to our terms of service and acknowledge that you have read and understand our privacy policy and code of conduct.

Not the answer you're looking for? Browse other questions tagged or ask your own question.