Plot 使用Mathematica在3D中绘制矢量和平面

我正在试用Mathematica软件，并尝试在3D中表示平面上的一些矢量投影

我说到这里：

我知道。。。它看起来没有那么令人印象深刻，想请求帮助修改红色箭头的斜角，更改平面的颜色，获得看起来更像阴影的投影向量，并在绘图上标记向量。或者其中的一部分

以下是我迄今为止使用的代码：

Show[{Plot3D[{z = 0}, {x, 0, .75}, {y, 0, .75}, 
   AxesLabel -> {x, y, z}, Mesh -> None, Boxed -> False, 
   Axes -> False],
  Graphics3D[{Red, Arrowheads[0.05], 
    Arrow[Tube[{{0.25, 0.25, 0}, {0.5, 0.5, 1}}]], Brown, 
    Arrowheads[0.05], Arrow[Tube[{{0.25, 0.25, 0}, {0.5, 0.5, 0}}]]}]}]

---

建议在mathematica.stackexchange.com上提问建议在mathematica.stackexchange.com上提问