matlab极坐标画圆，origin线性拟合曲线

matlab 极坐标平滑曲线相连接我想把多个坐标在极坐标下用平滑的曲线拟合.怎么才能让曲线闭合且圆滑.我的小程序附上：h1=[113.7 108.2 115.2 256.5 176.5 224.2 214.5 307.5 294.3 376.9 375 321.5 129.9 292.6 268.2

2016-06-09

matlab 极坐标平滑曲线相连接

我想把多个坐标在极坐标下用平滑的曲线拟合.怎么才能让曲线闭合且圆滑.

我的小程序附上：

h1=[113.7 108.2 115.2 256.5 176.5 224.2 214.5 307.5 294.3 376.9 375 321.5 129.9 292.6 268.2 273 221.3 204 236.7 200.2 200.3 107.1 142.6 116.2 234.7 125.3 61.6 51.7 61.6 66.4 111.2 62 114.1 114.1 60 60.1 60.1 78.1 79 118 37 37 37 64.7 55.3 64.7 47];

h2=80;

d=[4191 4146 2425 3824 2752 3501 3279 6075 5658 5172 4897 4520 2728 4308 4030 3930 3818 11400 6901 6972 7430 3790 6069 7442 6491 6924 5059 4806 5634 5783 8459 7200 8592 8591 5629 5228 5228 6820 10350 14610 6700 6700 6700 6333 5626 6216 6700];

h3=2000;

r=4/3*6371*1000;

theta=atan((h1-h2)./d-d./(2*r))*180/pi;

theta1=theta+31.6*sqrt(0.275./d);

R=sqrt((r.*tan(theta1.*pi./180)).^2+2*r.*(h3-h2))-r*tan(theta1.*pi./180);

theta2=[2 19 40 42 43 44 45 46 48 49 52 54 58 59 66 69 88 115 116 119 121 126 136 137 137 137 149 149 150 151 152 153 154 154 156 158 158 164 166 167 180 230 300 335 332 337 345];

plot(theta2,theta1);

polar(theta2.*pi./180,R);