Last chance! 50% off unlimited learning
Sale ends in
julianCenturyAnomaly(jd)
julianDay
.t <- ISOdatetime(1978, 11, 13, 4, 35, 0, tz="UTC")
jca <- julianCenturyAnomaly(julianDay(t))
cat(format(t), "is Julian Century anomaly", format(jca, digits=8), "")
Run the code above in your browser using DataLab