25 lines
622 B
Matlab
25 lines
622 B
Matlab
|
function [lat, lon, h] = ENU2LLA(E, N, U, lat0, lon0, h0)
|
|||
|
|
|
|||
|
|
% ENU 转 经纬高
|
|||
|
|
% lat0, lon0, h0: 起始点经纬高, 经纬度为rad， 高度为m
|
|||
|
|
% lat, lon, h 终点经纬度为rad， 高度为m
|
|||
|
|
% E, N ,U 系下增量，单位为m
|
|||
|
|
|
|||
|
|
%精确算法
|
|||
|
|
% XYZ0 = ch_LLA2ECEF(lat0, lon0, h0);
|
|||
|
|
% XYZ1 = ch_LLA2ECEF(lat, lon, h);
|
|||
|
|
% dXYZ = XYZ1 - XYZ0;
|
|||
|
|
%
|
|||
|
|
% [~, ~, C_ECEF2ENU, ~]= ch_earth(lat0, lon0, h0);
|
|||
|
|
% dENU = C_ECEF2ENU * dXYZ;
|
|||
|
|
% E = dENU(1);
|
|||
|
|
% N= dENU(2);
|
|||
|
|
% U = dENU(3);
|
|||
|
|
|
|||
|
|
%近似算法
|
|||
|
|
R_0 = 6378137; %WGS84 Equatorial radius in meters
|
|||
|
|
clat = cos(lat0);
|
|||
|
|
h = h0 + U;
|
|||
|
|
lon = lon0 + E/clat/R_0;
|
|||
|
|
lat = lat0 + N/R_0 ;
|
|||
|
|
end
|