[Rd] additional leap second

Ei-ji Nakama
2015-07-01T05:20:08Z

hi,

Index: leap_second/src/library/base/R/zdatetime.R
==================================================================---
leap_second/src/library/base/R/zdatetime.R    (revision 68608)
+++ leap_second/src/library/base/R/zdatetime.R    (working copy)
@@ -24,7 +24,8 @@
           "1979-12-31", "1981-6-30", "1982-6-30",
"1983-6-30",
           "1985-6-30", "1987-12-31",
"1989-12-31", "1990-12-31",
           "1992-6-30", "1993-6-30",
"1994-6-30","1995-12-31",
-          "1997-6-30", "1998-12-31",
"2005-12-31", "2008-12-31", "2012-6-30")
+          "1997-6-30", "1998-12-31",
"2005-12-31", "2008-12-31",
+          "2012-6-30", "2015-6-30")
     .leap.seconds <- strptime(paste(.leap.seconds , "23:59:60"),
                               "%Y-%m-%d %H:%M:%S")
     c(as.POSIXct(.leap.seconds, "GMT")) # lose the timezone

Best Regards,
--
Eiji NAKAMA <nakama (a) ki.rim.or.jp>
"\u4e2d\u9593\u6804\u6cbb"  <nakama (a) ki.rim.or.jp>