2017-01-23 132 views

回答

2

我們可以從extracttidyr

library(tidyr) 
extract(df1, date, into = c("Year", "Month", "Day"), "(.{4})(.{2})(.{2})") 

做這做另一種選擇是read.csv

cbind(df1, read.csv(text=sub("(.{4})(.{2})(.{2})", "\\1,\\2,\\3", 
    df1$date), header=FALSE, col.names = c("Year", "Month", "Day"))) 
+3

我喜歡儘可能使用基礎R。因此,我更喜歡你的第二個選項。我指出這一點,所以OP不認爲有必要使用tidyr。 – rbatt