Tag Info

New answers tagged

0

Thanks to Rahul Narain for pointing out my oversight, and thanks to Timothy Wofford for his suggestion. Here, I revised my code as below. I still keep on using the function DiscretizeGraphics because I can't get rid of the ugly boundaries produced by ListSurfacePlot3D. Code for viewpoint & position adjustment: model = Import["c:\\turtle.obj"]; vp = ...


4

The ability of adjusting the viewpoint and position of a model before obtaining its depth-map is necessary in most cases. By adopting the answers provided by the nice guys here, I obtained an alternative method in which the viewpoint and position of the model can be adjusted right before producing its depth-map. And function DiscretizeGraphics was used ...


2

Here's a variation to help with different points of view. data = ExampleData[{"Geometry3D", "StanfordBunny"}, "VertexData"]; viewPoint = {-1, -1, -1}; {min, max} = {Min@#, Max@#} &@(EuclideanDistance[#, viewPoint] & /@ data) ListSurfacePlot3D[data, MaxPlotPoints -> 50, ViewPoint -> viewPoint, ColorFunction -> (Glow[GrayLevel[ (max - ...


12

Mostly the same as @SimonWoods, but it runs on V9: data = ExampleData[{"Geometry3D", "StanfordBunny"}, "VertexData"]; ListSurfacePlot3D[data, MaxPlotPoints -> 50, ColorFunction -> (Glow[GrayLevel[#3]] &), Mesh -> None, Background -> Black, Boxed -> False, ViewPoint -> {0, 0, 10}, Axes -> False]


13

Something like this perhaps: model = ExampleData[{"Geometry3D", "StanfordBunny"}]; region = BoundaryDiscretizeGraphics[model]; Rasterize @ RegionPlot3D[region, ColorFunction -> (Glow[GrayLevel[#3]] &), ViewPoint -> {0, 0, 10}, Background -> Black, Boxed -> False, Lighting -> None]



Top 50 recent answers are included