Grid &引用;“三维网格”;在图形3d中的框内 请考虑: cAxes = {{{0, 0, 0}, {0, 0, 1}}, {{0, 0, 0}, {0, 1, 0}}, {{0, 0,0}, {1, 0, 0}}}; Graphics3D[{Line /@ cAxes}, Boxed -> False]

Grid &引用;“三维网格”;在图形3d中的框内 请考虑: cAxes = {{{0, 0, 0}, {0, 0, 1}}, {{0, 0, 0}, {0, 1, 0}}, {{0, 0,0}, {1, 0, 0}}}; Graphics3D[{Line /@ cAxes}, Boxed -> False],grid,wolfram-mathematica,graphics3d,Grid,Wolfram Mathematica,Graphics3d,盒子里可能有网格吗?我猜“3D网格”这里是我认为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 /@ {{{


盒子里可能有网格吗?我猜“3D网格”

这里是我认为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]

您必须作为一组单独的图形指令来执行此操作<代码>面栅格适用于长方体面。我还没来得及把它打出来,其他人肯定会先把它打出来。如果你使用像
缩放[{x,y,0}]
这样的坐标,你会得到适用于任何绘图范围的网格线。(当然,它们可能不会与轴对齐。)