最小二乘法拟合球面源代码（matlab）

1、源代码

[x,y,z]=sphere(5);x = [0,0,1,0,0,0.7].';   %自己的数据y = [0,1,0,0,-1,0.7].';  %自己的数据z = [1,0,0,-1,0,0].';    %自己的数据% 拟合x = x(:); y = y(:); z = z(:);data=unique([x(:)-0.1,y(:)+0.2,z(:)],'rows');f=@(p,data)(data(:,1)-p(1)).^2+(data(:,2)-p(2)).^2+(data(:,3)-p(3)).^2-p(4)^2;p=nlinfit(data,zeros(size(data,1),1),f,[0 0 0 1]')%拟合的参数hold onplot3(data(:,1),data(:,2),data(:,3),'o')[X,Y,Z]=meshgrid(linspace(-14,14));V=(X-p(1)).^2+(Y-p(2)).^2+(Z-p(3)).^2-p(4)^2;isosurface(X,Y,Z,V,0);alpha .5;camlight;axis equal;grid on;view(3);title(sprintf('(x-%f)^2+(y-%f)^2+(z-%f)^2=%f',p(1),p(2),p(3),p(4)^2))

在matlab的输入窗口输入源代码后按Enter键如下图所示

2、实验结果