我想将月份中的某一天设置为Date到当月的开始日期（01）。
现在我使用以下内容：
currentDate <- Sys.Date() #for getting current system date eg:2012-11-06
formatDate <- format(currentDate, "%Y-%m") #it return 2012-11
startDate <- as.Date(paste(formatDate, "-01", sep = ""))
# 2012-11-01
有什么简单的方法可以做到这一点吗？
是的，有一个单行代码可以使用该函数cut:
cut(Sys.Date(), "month")
[1] 2012-11-01
Levels: 2012-11-01
本文内容由网友自发贡献，版权归原作者所有，本站不承担相应法律责任。如您发现有涉嫌抄袭侵权的内容，请联系:hwhale#tublm.com(使用前将#替换为@)
