"3d сетка" внутри коробки в Graphics3D - PullRequest
3 голосов
/ 14 ноября 2011

Пожалуйста, подумайте:

cAxes = {{{0, 0, 0}, {0, 0, 1}}, {{0, 0, 0}, {0, 1, 0}}, {{0, 0,0}, {1, 0, 0}}};

Graphics3D[{Line /@ cAxes}, Boxed -> False]

enter image description here

Возможно ли иметь решетки внутри коробки?Я думаю, "3D Grid"

1 Ответ

8 голосов
/ 14 ноября 2011

Вот переработанная версия того, что, как я считаю, пытался Вербея:

cAxes = {{{0, 0, 0}, {0, 0, 1}}, {{0, 0, 0}, {0, 1, 0}}, {{0, 0, 
     0}, {1, 0, 0}}};

a = Graphics3D[{Line /@ cAxes}, Boxed -> False];

b = Graphics3D[{
      GrayLevel[0.5],
      Table[Line /@ {{{x, y, 0}, {x, y, 1}},
                     {{x, 0, y}, {x, 1, y}},
                     {{0, x, y}, {1, x, y}}},
        {x, 0, 1, 0.25},
        {y, 0, 1, 0.25}
      ]
    }];

Show[a, b]

enter image description here

...