New answers tagged style
1
A function showing a different way to modify the style of a cell:
ChangeStyle[cell_CellObject, style_String] :=
NotebookWrite[cell, ReplacePart[NotebookRead[cell], 2 -> style]];
7
Perhaps you could use an adapted version of the billboard3D function that I adapted from a previous answer here How to write graffiti, i.e., text on a polygon surface in Graphics3D? that I ultimately adapted from a Wolfram-U video presentation
Advanced 3D Graphics in the Wolfram Language. It uses normals rather than Euler angles, but it should be ...
2
We can use SliceContourPlot3D with "BackPlanes" as the slice surface to add face grids with desired colors:
ClearAll[addFaceGrids]
addFaceGrids[color_: GrayLevel[.8], linecolor_: White] := Module[{r = PlotRange[#]},
Show[#, SliceContourPlot3D[#, "BackPlanes",
{x, r[[1, 1]], r[[1, 2]]}, {y, r[[2, 1]], r[[2, 2]]}, {z, r[[3, 1]], r[[...
4
plot = Plot3D[Sin[x + y^2], {x, -3, 3}, {y, -2, 2},
ColorFunction -> "BlueGreenYellow",
PlotTheme -> {"Marketing", "NoAxes"}, Boxed -> False]
4
ClearAll[canvas]
canvas[color_: GrayLevel[0, .3]] := Graphics3D@{{EdgeForm[], color, EdgeForm[None],
InfinitePlane[{Scaled[{0, 0, 0}], Scaled[{0, 1, 0}], Scaled[{1, 1, 0}]}],
InfinitePlane[{Scaled[{0, 0, 0}], Scaled[{0, 0, 1}], Scaled[{0, 1, 1}]}],
InfinitePlane[{Scaled[{0, 1, 0}], Scaled[{0, 1, 1}], Scaled[{1, 1, 1}]} ]}}
plot = Plot3D[Sin[x + ...
Top 50 recent answers are included
