julianCenturyAnomaly {oce} | R Documentation |
Convert a Julian-Day number to a time in julian centuries since noon on January 1, 1900.
julianCenturyAnomaly(jd)
jd |
a julian day number, e.g. as given by |
The method follows Meese (1982 equation 15.1). The example reproduces the example provided by Meeuse (1982 example 15.a), with fractional error 3e-8.
Julian century since noon on January 1, 1900.
Dan Kelley
Meeus, Jean, 1982. Astronomical formuae for Calculators. Willmann-Bell. Richmond VA, USA. 201 pages
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), "\n")