4.简化儒略日转年积日 function [year,doy] = wzq_mjd2yd(mjd) %% ucas@Chistrong Wen % 2022-10-17 days = [366,365,365,365]; mjd52 = 34012; doy = mjd+1-mjd52; i = 1; year = 52; while(doy>days(i)) doy = doy-days(i); year = year+1; i = mod(year,4)+1; end ...
4.简化儒略日转年积日 function[year,doy]=wzq_mjd2yd(mjd)%%ucas@Chistrong Wen%2022-10-17days=[366,365,365,365];mjd52=34012;doy=mjd+1-mjd52;i=1;year=52;while(doy>days(i))doy=doy-days(i);year=year+1;i=mod(year,4)+1;endif(year<1900)if(year>60)year=year+1900;elseyear=year...
4.简化儒略日转年积日 function[year,doy]=wzq_mjd2yd(mjd)%%ucas@Chistrong Wen%2022-10-17days=[366,365,365,365];mjd52=34012;doy=mjd+1-mjd52;i=1;year=52;while(doy>days(i))doy=doy-days(i);year=year+1;i=mod(year,4)+1;endif(year<1900)if(year>60)year=year+1900;elseyear=year...