清华数学实验实验2飞行航程计算.pptVIP

实验二: 飞行航程计算实验 ;航程计算的问题背景 ;假设:飞机飞行高度为10km,飞行速度为每小时980公里;地球半径为6400km;球面短程线长度计算公式 L = R×? ;x = R cosθ cosφ y = R cosθ sinφ z = R sinθ ;city=[40,116;41,-76]; %city=[40,116;31,122;36,140;37,-123;41,-76]; R=6400+10; theta=city(:,1)*pi/180; fai=city(:,2)*pi/180; x=R*cos(theta).*cos(fai); y=R*cos(theta).*sin(fai); z=R*sin(theta); op=[x,y,z]; format bank Dmatrix=R*acos(op*op/R^2);思 考 问 题;[X,Y,Z]=sphere(24); city=[40,118;41,-76]; theta=city(:,1)*pi/180; fai=city(:,2)*pi/180; x=cos(theta).*cos(fai); y=cos(theta).*sin(fai); z=sin(theta); t=linspace(0,1,20); xt=(1-t)*x(1)+t*x(2); yt=(1-t)*y(1)+t*y(2); zt=