]; trim = { {0.01, .27}, {.97, .89} }; imgname = "Wignerfunction_squeezed_" <> TextString[z] <> ".png"; Export[imgname, ImageResize[ ImageTrim[Image[plot...
]; trim = { {0.01, .27}, {.97, .89} }; imgname = "Wignerfunction_squeezed_" <> TextString[z] <> ".png"; Export[imgname, ImageResize[ ImageTrim[Image[plot...
]; trim = { {0.01, .27}, {.97, .89} }; imgname = "Wignerfunction_squeezed_" <> TextString[z] <> ".png"; Export[imgname, ImageResize[ ImageTrim[Image[plot...
]; trim = { {0.01, .27}, {.97, .89} }; imgname = "Wignerfunction_squeezed_" <> TextString[z] <> ".png"; Export[imgname, ImageResize[ ImageTrim[Image[plot...
]; trim = { {0.01, .27}, {.97, .89} }; imgname = "Wignerfunction_squeezed_" <> TextString[z] <> ".png"; Export[imgname, ImageResize[ ImageTrim[Image[plot...
Sin[\[Theta]], 0.8/Pi}]}], ViewPoint -> {1.2, -2.2, 1}, Background -> None, PlotRange -> All] Export["Wignerfunction_marginal_projection.png", ImageCrop[...