这里介绍两种方法
一种势svd分解
另一种只需要两行代码
当然,结果是一样的
**直线拟合的两种方法 ***一,svd分解,挺笨的办法 t:=[1:100] tuple_rand (|t|, Randx) tuple_rand (|t|, Randy) tuple_rand (|t|, Randz) ***2,1,5 x:=3*t+2+Randx*2 y:=4*t+1+Randy*6 z:=5*t+5+Randz*4 gen_object_model_3d_from_points (x,y, z, ObjectModel3D) moments_object_model_3d (ObjectModel3D, 'mean_points', Moments) x0:=x-Moments[0] y0:=y-Moments[1] z0:=z-Moments[2] tuple_length (z0, Length) create_matrix (Length, 3, 0, MatrixID) for Index := 0 to Length-1 by 1 set_value_matrix (MatrixID, I