平面上的点阵与矩阵乘法的关系

1、给定平面上的36个点：

pts = Table[{x, y}, {x, 6}, {y, 6}] //……

2、作出散点图：

Graphics[{Red, Point[pts]}]

3、给定矩阵A：

A={{1/3, 2}, {1, 2}};

4、A左乘散点图对应的矩阵：

A.(pts // Transpose) // Transpose

得到一组新的散点图。

5、把原散点图和新散点图画在同一坐标系下：

Graphics[……]

6、A右乘散点图对应的矩阵：

pt3 = pts.A

得到另一组新的散点图，图像如下。