d is a list, so can you tell us unclass(d) in both cases?
Sure -- they look OK to me:
d<-strptime("1910/1/1", "%Y/%m/%d")
unclass(d)
$sec
[1] 0
$min
[1] 0
$hour
[1] 0
$mday
[1] 1
$mon
[1] 0
$year
[1] 10
$wday
[1] 6
$yday
[1] 0
$isdst
[1] -1
d<-strptime("1970/1/1", "%Y/%m/%d")
unclass(d)
$sec
[1] 0
$min
[1] 0
$hour
[1] 0
$mday
[1] 1
$mon
[1] 0
$year
[1] 70
$wday
[1] 4
$yday
[1] 0
$isdst
[1] 0
Also, I cannot see those examples anywhere in the R sources so can you
please show the actual output you got.
My examples are based on as.POSIXlt from datetime.R.
Here are the relevant sections of the output from the tests (if I
comment out these sections in reg-tests-1.R and base-Ex.R then
"make check" runs fine):
$ cd ~/install/R/R-1.9.0/tests
gwhite@montigo:/user/gwhite/install/R/R-1.9.0/tests
$ gmake reg-tests-1.Rout
running code in 'reg-tests-1.R' ...gmake: *** [reg-tests-1.Rout] Error 1
$ tail -20 reg-tests-1.Rout.fail
(t1 <- strptime(c("6. Aug. 1930", "3. Nov. 1925", "28. Mar. 1959",
+ NA, paste(1:29," Feb. 1960", sep=".")),
+ format = "%d. %b. %Y"))
[1] "1930-08-06" "1925-11-03" "1959-03-28" NA "1960-02-01"
[6] "1960-02-02" "1960-02-03" "1960-02-04" "1960-02-05" "1960-02-06"
[11] "1960-02-07" "1960-02-08" "1960-02-09" "1960-02-10" "1960-02-11"
[16] "1960-02-12" "1960-02-13" "1960-02-14" "1960-02-15" "1960-02-16"
[21] "1960-02-17" "1960-02-18" "1960-02-19" "1960-02-20" "1960-02-21"
[26] "1960-02-22" "1960-02-23" "1960-02-24" "1960-02-25" "1960-02-26"
[31] "1960-02-27" "1960-02-28" "1960-02-29"
stopifnot(6 == length(print(s1 <- summary(t1))),
+ s1== summary(as.POSIXct(t1)),
+ 6 == length(print(format(as.Date(s1)))) )
Min. 1st Qu. Median Mean 3rd Qu. Max.
NA NA NA NA NA NA
Min. 1st Qu. Median Mean 3rd Qu. Max.
NA NA NA NA NA NA
Error in if (!(is.logical(r <- eval(ll[[i]])) && all(r))) stop(paste(deparse(mc[[i + :
missing value where TRUE/FALSE needed
Execution halted
$ cd Examples
$ gmake base-Ex.Rout
running code in 'base-Ex.R' ...
Execution halted
$ tail -4 base-Ex.Rout.fail
## first days of years
seq(as.Date("1910/1/1"), as.Date("1999/1/1"), "years")
Error in fromchar(x) : character string is not in a standard unambiguous format
Execution halted
On Fri, 23 Apr 2004 aa056@chebucto.ns.ca wrote:
Full_Name: George N. White III
Version: 1.9.0
OS: Irix 6.5.21m
Submission from: (NULL) (142.176.61.212)
R-1.9.0 built using the SGI MIPSPro compilers
Installation directory: /usr/local
C compiler: c99 -OPT:IEEE_NaN_inf=ON -mips4 -n32 -O3
-OPT:Olimit_opt=on
C++ compiler: CC -OPT:IEEE_NaN_inf=ON -mips4 -n32 -O3
-OPT:Olimit_opt=on -LANG:std
Fortran compiler: f90 -OPT:IEEE_NaN_inf=ON -mips4 -n32 -O3
-OPT:Olimit_opt=on
Interfaces supported: X11, gnome, tcltk
External libraries: readline, BLAS(generic), LAPACK(generic)
Additional capabilities: PNG, JPEG
Options enabled: shared library, R profiling
Recommended packages: yes
"make check" fails in 2 places due to is.na(..) returning TRUE for valid dates:
d<-strptime("1910/1/1", "%Y/%m/%d")
is.na(d)
d<-strptime("1970/1/1", "%Y/%m/%d")
is.na(d)
[1] "1970-01-01"
Incidentally: