grid - Graphics3D のボックス内の「3d グリッド」

Question

考えてください ：

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

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

Box 内にグリッドを配置することは可能ですか? 「3Dグリッド」かな

Answer 1

これは、Verbeia が試みていたと私が信じていることの作り直されたバージョンです。

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]