R-timeDate() 根据日期查星期几

#目标：输入一个日期，需要判断是否周末/或者周几

方法一：

weekdays()

注意：适用于.Date格式

Example：

> date
[1] "2013-11-14"
> weekdays(date)
错误于UseMethod("weekdays") : 
  "weekdays"没有适用于"character"目标对象的方法
> weekdays(as.Date(date))
[1] "星期四"

方法二：dayOfWeek()

package(timeDate)

注意：适用格式GMT格式

#报错：

 x<-as.Date("2013-11-15")

 x
[1] "2013-11-15"
 library(timeDate)
 dayOfWeek(x)
错误: 不是所有的inherits(x, "timeDate")都是TRUE

修正：

timeDate()要求的数据格式必须是GMT格式的，所以要先对.Date格式进行转换

Example:

date<-"2013-11-14"

 dateGMT<-timeDate(date, FinC = "GMT")
day<-dayOfWeek(dateGMT)
date
[1] "2013-11-14"
 dateGMT
GMT
[1] [2013-11-14]
 day
2013-11-14 
     "Thu" 

附：

Official Example：

## timeCalendat -  
   tC = timeCalendar()
 
## The days of the Year:
   dayOfWeek(tC)
 
## Use Deprecated Function:
   getDayOfWeek <- dayOfWeek
   getDayOfWeek(tC)