Сгенерируйте маленькие круги
Сгенерируйте истинный маленький круг, локсодромный маленький круг и ограничивающий случай большого круга.
Отображение осей карты с ортогональной проекцией.
figure; axesm ortho; gridm on; framem on setm(gca,'Origin', [45 30 30], 'MLineLimit', [75 -75],... 'MLineException',[0 90 180 270])
Задайте три центральные точки сферы.
A = [45 90]; B = [0 60]; C = [0 30];
Создайте три маленьких окружности вокруг трех центральных точек. Первый, sca, является истинным маленьким кругом. Второй, scb, является локсодромным маленьким кругом. Третий, scc, является большим кругом как ограничивающий случай небольшого круга.
sca = scircle1(A(1), A(2), 20);
scb = scircle2(B(1), B(2), 0, 150);
scc = scircle1('rh',C(1), C(2), 20);Отобразите точки и соответствующие им небольшие круги с различными цветами. Пометьте маленькие круги.
plotm(A(1), A(2),'ro','MarkerFaceColor','r') plotm(B(1), B(2),'bo','MarkerFaceColor','b') plotm(C(1), C(2),'mo','MarkerFaceColor','m') plotm(sca(:,1), sca(:,2),'r') plotm(scb(:,1), scb(:,2),'b--') plotm(scc(:,1), scc(:,2),'m') textm(50,0,'Normal Small Circle') textm(46,6,'(20\circ from point A)') textm(4.5,-10,'Loxodromic Small Circle') textm(4,-6,'(20\circ from point C') textm(-2,-4,'in rhumb line sense)') textm(40,-60,'Great Circle as Small Circle') textm(45,-50,'(90\circ from point B)')
