> dates <- c("02/27/92", "02/27/92", "01/14/92", "02/28/92", "02/01/92")
> sys<-as.Date(dates, "%m/%d/%y")
> format(sys, "%a")
这样可以输出每个日期对应星期几，不过是中文字符格式的，如果非要转换成字符格式的，可以用switch函数，把输入中文字符就会输出对应的数值。

谢谢楼上的回答哈