摘要

描述Leapsecond.ut1-utc.svg	English: Plot showing the difference UT1−UTC in seconds. Vertical segments correspond to leap seconds. Red part of graph was prediction (future values) at the time the file was made. Čeština: Graf zobrazující rozdíl UT1−UTC v sekundách. Svislé úseky odpovídají přestupným sekundám. Červená část je předpověď budoucích hodnot (v okamžiku vytvoření grafu).
日期	2017-01-05, last update 2024-01-03
來源	Own work using: https://maia.usno.navy.mil/ser7/finals.all
作者	Tomia (傾偈 · 貢獻) Petr Kadlec (傾偈 · 貢獻) Gordon P. Hemsley (傾偈 · 貢獻) RP88 (傾偈 · 貢獻)
許可 (重用呢個檔案)	Public domainPublic domainfalsefalse This work is ineligible for copyright and therefore in the public domain because it consists entirely of information that is common property and contains no original authorship.   This file is made available under the Creative Commons CC0 1.0 Universal Public Domain Dedication. The person who associated a work with this deed has dedicated the work to the public domain by waiving all of their rights to the work worldwide under copyright law, including all related and neighboring rights, to the extent allowed by law. You can copy, modify, distribute and perform the work, even for commercial purposes, all without asking permission. http://creativecommons.org/publicdomain/zero/1.0/deed.enCC0Creative Commons Zero, Public Domain Dedicationfalsefalse
Other versions	Original PNG image (2005) Derivative SVG image (2008)
SVG genesis InfoField	The SVG code is valid.   This plot was created with Gnuplot.

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 5.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 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