二向箔在数学上怎么体现呢

1、给定三维空间里面的若干点的坐标。pts = Partition[Table[RandomReal[10], 108], 3]

3、pts其实可以视为列数为3的矩阵：pts // MatrixForm

5、显然，pt0变成了同一个平面上的点。Graphics[{Blue, PointSize -> 0.02, Point[pt0]}, Axes -> True]这其实就是二维打击，把三维空间压缩到平面上的二向箔。

7、对应点之间连接箭头：Graphics3D[{Pink巳呀屋饔, Arrow[Table[{pts[[n]], (Join[#, {1}] & /@ pt0)[[n]]}, {n, 36魈胺闹臣}]]}, Axes -> True]