獲得當月

我想要得到的起始日期開始當月的日期R. 現在我用下面獲得當月

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="")) #it return 2012-11-01

有沒有簡單的方法來做到這一點？

來源

2012-11-06 Nandu

如果在Linux中，您可以使用system（「date」，intern = T）將日期信息提取爲字符串，然後對其進行編輯。 –

是的，有一個班輪爲使用功能cut：

cut(Sys.Date(), "month") 
[1] 2012-11-01 
Levels: 2012-11-01

來源

2012-11-06 09:27:42 plannapus

謝謝你的答案。它的作品 – Nandu

而且一條線使用的格式功能：

format(Sys.Date(),"01-%m-%Y") 
[1] "01-06-2017"

來源

2017-06-19 09:34:39

這有一個額外的好處，保持在一個日期格式，而不是通過'cut'將其轉換爲一個因子。 –

'class（format（Sys.Date（），「01-％m-％Y」））'result as'「character」'。但是'class（cut（Sys.Date（），「month」））'產生''factor「'。所以，這些方法需要日期轉換apporach！ – Prradep

as.Date(gsub(" ","",paste(format(Sys.Date(),"%Y-%m"),"-01")))

來源

2017-12-28 00:41:28 user6397960

對此解決方案進行更詳細的闡述是非常有用的，它解釋瞭如何或爲何解決被問到的問題，或者爲什麼它與問題或其他答案中描述的方法更好/不同。 – sytech

使用lubridate（也sec工作， min,hour,mon,year等）

library(lubridate) 

dt <- Sys.Date() 
day(dt) <- 01 

dt 
# [1] "2018-01-01"

來源

2018-01-17 01:32:35 Suren

回答

相關問題