0
$\begingroup$

I am trying to visualize a Convolutional Neural Network. Here is my code and figure:

Graphics3D[{EdgeForm[{Black,Opacity[1],Thickness[0.1]}],
            FaceForm[{Gray,Opacity[0.02]}],
    Cuboid[{1,11,8},{4,19,18}],
    Cuboid[{7,2,9},{10,22,30}],
    Cuboid[{7,7,13},{10,11,16}],
    Cuboid[{12,7,14},{15,17,25}],
    Cuboid[{12,12,16},{15,14,18}]},
    ViewPoint->{4, -4, 4}]

a busy cat

White what I prefer it this viewpoint. prefer

I have tried dynamically adjusting the viewpoint, however, the vanishing point for the 3d plot always seems too close. Could anyone kindly help?

Improve this question
$\endgroup$
2
  • $\begingroup$ The posted code does not generate the posted graphics. For one, Thickness[0.1] should have resulted in unreasonably thick edges. Have you tried much larger values for the ViewPoint, perhaps together with ViewAngle -> All? $\endgroup$
    – MarcoB
    Commented Jun 26, 2018 at 1:05
  • $\begingroup$ This might be helpful: mathematica.stackexchange.com/questions/3528/… -- but it sounds like you want to pick larger values, e.g. ViewPoint -> 20 {1, -1, 1} or something bigger than 20. (Though to me, the picture showing your preference seems to have a closer vanishing point than your Graphics3D.) $\endgroup$
    – Michael E2
    Commented Jun 26, 2018 at 3:00

1 Answer 1

Reset to default
1
$\begingroup$ 
Manipulate[
Graphics3D[
....,
ViewPoint->{a,b,c}],
{a,-1,1},{b,-1,1},{c,-1,1}]
Improve this answer
$\endgroup$

Your Answer

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

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