R语言日期的表示和运算(详细总结).doc

R语言日期的表示和运算（详细总结） 1、取出当前日期Sys.Date()1 2014-10-29date() #注意：这种方法返回的是字符串类型1 Wed Oct 29 20:36:07 20142、在R中日期实际是double类型，是从1970年1月1日以来的天数typeof(Sys.Date()1 double3、转换为日期用as.Date()可以将一个字符串转换为日期值，默认格式是yyyy-mm-dd。as.Date(2007-02-01) #得到2007-02-01，显示为字符串，但实际是用double存储的as.double(as.Date(1970-01-01) #结果为0，是从1970年1月1日以来的天数。可以把定制的日期字符串转换为日期型as.Date(2007年2月1日, %Y年%m月%d日) 1 2007-02-01格式意义%Y年份，以四位数字表示，2007%m月份，以数字形式表示，从01到12%d月份中当的天数，从01到31%b月份，缩写，Feb%B月份，完整的月份名，指英文，February%y年份，以二位数字表示，074、把日期值输出为字符串today - Sys.Date()format(today, %Y年%m月%d日)1 2014年10月29日5、计算日期差由于日期内部是用double存储的天数，所以是可以相减的。today - Sys.Date()gtd as.Date(23-2013-1,format=%d-%Y-%m)1 2013-01-23格式意义%d月份中当的天数%m月份，以数字形式表示%b月份，缩写%B月份，完整的月份名，指英文%y年份，以二位数字表示%Y年份，以四位数字表示#其它日期相关函数weekdays（）取日期对象所处的周几；months（）取日期对象的月份；quarters（）取日期对象的季度；#POSIX类The POSIXct class stores date/time values as the number of seconds since January 1, 1970, while the POSIXlt class stores them as a list with elements for second, minute, hour, day, month, and year, among others.POSIXct 是以1970年1月1号开始的以秒进行存储，如果是负数，则是1970年以前；正数则是1970年以后。POSIXlt 是以列表的形式存储：年、月、日、时、分、秒；mydate = as.POSIXlt(2005-4-19 7:01:00)names(mydate)默认情况下，日期之前是以/或者-进行分隔，而时间则以：进行分隔；输入的标准格式为：日期 时间（日期与时间中间有空隔隔开）时间的标准格式为：时:分 或者 时:分:秒；如果输入的格式不是标准格式，则同样需要使用strptime函数，利用format来进行指定；#生成案例数据Dates - c(2009-09-28,2010-01-15)Times - c( 23:12:55, 10:34:02)charvec - timeDate(paste(Dates, Times)timeDate(charvec)#取系统的时间Sys.timeDate（）#一个月的第一天timeFirstDayInMonth()#一个月的最后一天timeLastDayInMonth（）#一周当中第几天dayOfWeek()#一年当中的第几天dayOfYear()Sys.Date( ) returns todays date. date() returns the current date and time.# print todays datetoday -Sys.Date()format(today, format=%B %d %Y)June 20 2007# convert date info in format mm/dd/yyyystrDates - c(01/05/1965, 08/16/1975)dates - as.Date(strDates, %m/%d/%Y) # convert dates to character datastrDates as.Date(1915-6-16)1 1915-06-16 as.Date(1990/02/17)1 1990-02-17 as.Date(1/15/2001,format=%m/%d/%Y)1 2001-01-15 as.Date(April 26, 2001,format=%B %d, %Y)1 2001-04-26 as.Date(22JUN01,format=%d%b%y) # %y is system-specific; use with caution1 2001-06-22 bdays = c(tukey=as.Date(1915-06-16),fisher=as.Date(1890-02-17),+ cramer=as.Date(1893-09-25), kendall=as.Date(1907-09-06) weekdays(bdays) tukey fisher cramer kendallWednesday Monday Monday Friday dtimes = c(2002-06-09 12:45:40,2003-01-29 09:30:40,+ 2002-09-04 16:45:40,2002-11-13 20:00:40,+ 2002-07-07 17:30:40) dtparts = t(as.data.frame(strsplit(dtimes, ) s(dtparts) = NULL thetimes = chron(dates=dtparts,1,times=dtparts,2,+ format=c(y-m-d,h:m:s) thetimes1 (02-06-09 12:45:40) (03-01-29 09:30:40) (02-09-04 16:45:40)4 (02-11-13 20:00:40) (02-07-07 17:30:40) dts = c(2005-10-21 18:47:22,2005-12-24 16:39:58,+ 2005-10-28 07:30:05 PDT) as.POSIXlt(dts)1 2005-10-21 18:47:22 2005-12-24 16:39:58 3 2005-10-28 07:30:05 dts = c(1127056501,1104295502,1129233601,1113547501,+ 1119826801,1132519502,1125298801,1113289201) mydates = dts class(mydates) = c(POSIXt,POSIXct) mydates1 2005-09-18 08:15:01 PDT 2004-12-28 20:45:02 PST3 2005-10-13 13:00:01 PDT 2005-04-14 23:45:01 PDT5 2005-06-26 16:00:01 PDT 2005-11-20 12:45:02 PST7 2005-08-29 00:00:01 PDT 2005-04-12 00:00:01 PDT mydate = strptime(16/Oct/2005:07:51:00,format=%d/%b/%Y:%H:%M:%S)1 2005-10-16 07:51:00 ISOdate(2005,10,21,18,47,22,tz=PDT)1 2005-10-21 18:47:22 PDT thedate = ISOdate(2005,10,21,18,47,22,tz=PDT) format(theda