The R Project SVN R

Rev

Rev 27976 | Rev 34344 | Go to most recent revision | Show entire file | Ignore whitespace | Details | Blame | Last modification | View Log | RSS feed

Rev 27976 Rev 28166
Line 195... Line 195...
195
z <- strptime(x, "\%d\%b\%Y")
195
z <- strptime(x, "\%d\%b\%Y")
196
## Sys.setlocale("LC_TIME", lct)
196
## Sys.setlocale("LC_TIME", lct)
197
z
197
z
198
 
198
 
199
## read in date/time info in format 'm/d/y h:m:s'
199
## read in date/time info in format 'm/d/y h:m:s'
200
dates <- c("02/27/92", "02/27/92", "01/14/92",
200
dates <- c("02/27/92", "02/27/92", "01/14/92", "02/28/92", "02/01/92")
201
           "02/28/92", "02/01/92")
-
 
202
times <- c("23:03:20", "22:29:56", "01:03:30",
201
times <- c("23:03:20", "22:29:56", "01:03:30", "18:21:03", "16:56:26")
203
           "18:21:03", "16:56:26")
-
 
204
x <- paste(dates, times)
202
x <- paste(dates, times)
205
z <- strptime(x, "\%m/\%d/\%y \%H:\%M:\%S")
203
z <- strptime(x, "\%m/\%d/\%y \%H:\%M:\%S")
206
z
204
z
207
}
205
}
208
\keyword{utilities}
206
\keyword{utilities}