File:Leapsecond.ut1-utc.svg
-
Original PNG image (2005) -
Derivative SVG image (2008)
Source code
Generated using the following scripts:
wget https://maia.usno.navy.mil/ser7/finals.all cut -c 1-2,3-4,5-6,8-15,58,59-68 --output-delimiter " " finals.all > finals-cut.txt grep "P" finals-cut.txt > finals-pred.txt grep "I" finals-cut.txt > finals-iers.txt gnuplot leapsecs.gnuplot
leapsecs.gnuplot contains commands for gnuplot 6.0:
set xdata time
set timefmt "%Y-%m-%d"
set format x "%Y"
set xrange ["1973-01-01":"2026-01-01"]
set yrange [-0.9:0.9]
set xtics "1970-01-01", 5 years
set mxtics time 1 year
set grid lt 3 lc 0
set terminal svg font "Arial,16"
set style line 1 lc rgb 'dark-green' lt 1
set style line 2 lc rgb 'red' lt 1
unset key
makedate(y,m,d,j) = sprintf("%04d-%02d-%02d", (j <= 51543 ? 1900 + y : 2000 + y), m, d)
set output 'Leapsecond.ut1-utc.svg'
plot \
'finals-iers.txt' \
using (makedate($1,$2,$3,$4)):($6) \
with lines linestyle 1 title 'Measured', \
'finals-pred.txt' \
using (makedate($1,$2,$3,$4)):($6) \
with lines linestyle 2 title 'Predicted'
set output
