chron(dates, times, format = c("m/d/y","h:m:s"), out.format, origin)
The dates format can be any permutation of the characters "d", "m", or "y" delimited by a separator (possibly null), e.g., "m/d/y", "d-m-y", "ymd", are all valid. The format can also be permutations of the words "day" "month" and "year", which produces the month name, e.g., "month day year" produces "April 20 1992", "day mon year" produces "20 Apr 1992".
The times format can be any permutation of "h", "m", and "s" separated by any one non-special character. The default is "h:m:s".
These objects represent dates and times of day, and allow the following arithmetic and summaries: subtraction d1-d2, constant addition d1+constants, all logical comparisons, summaries min(), max(), and range() (which drop NAs by default); constants specify days (fractions are converted to time-of-day, e.g., 2.5 represents 2 days and 12 hours). Operations such as sorting, differencing, etc., are automatically handled.
There are methods for as.character(), as.numeric(), cut(), is.na(), print(), summary(), plot(), lines(), lag(), and the usual subsetting functions [, [<-. The functions days(), months(), quarters(), years(), weeks() weekdays(), hours(), minutes(), and seconds() take any chron object as input and extract the corresponding time interval. cut() is used to create ordered factors from chron objects. Chronological objects may be used with the modeling software.
The current implementation of chron objects does not handle time zones nor daylight savings time.
mr.date <- chron(c("09/28/89","02/09/90","09/15/88","08/30/91") ) mr.date# the following should be returned: # [1] 09/28/89 02/09/90 09/15/88 08/30/91
range(mr.date) # [1] 09/15/88 08/30/91
mr.date[mr.date > "01/01/90"] # [1] 02/09/90 08/30/91
# need to create objects dts and tms: lathe.date <- chron(dts, tms, format=c("ymd", "h:m:s") ) lathe.date # [1] (09/28/90 23:12:55) (10/22/90 10:34:02) (11/06/90 08:30:00) # [4] (11/19/90 01:15:00) (11/28/90 20:00:00)
lathe.date[1] + 2.5 # two and a half days after lathe start # [1] (10/01/90 11:12:55)
lathe.date[2] - lathe.date[1] # time between events # Time in days: # [1] 24.473
summary(mr.date)