我有一个数据框。
df <- data.frame(matrix(data = rexp(200, rate = 10), nrow = 10, ncol = 20))
现在,我真的想使用今天的日期和Sys.Date() + ncol(df)
转发来重命名标题。所以,我的数据框看起来像这样
2014-12-12 2014-12-13 2014-12-14 .....
values values values .....
我尝试过的
colnames(df) <- c(seq.Date(from = Sys.Date(),
to = Sys.Date() + ncol(df), by = "days"))
和
colnames(df) <- gsub(pattern = " ", x = c(seq.Date(from = Sys.Date(),
to = Sys.Date() + ncol(df), by = "days")), replacement = ",")
我想这很简单,但我似乎无法弄清楚。如果我只写一些静态的东西,例如
colnames(df)[1] <- Sys.Date()
colnames(df)[2] <- Sys.Date() + 1
我只是得到数据的数字表示,而不是像“%Y-%m%-%d”中那样的日期。
names(df) <- as.character(Sys.Date() + seq_along(df) - 1)
本文收集自互联网,转载请注明来源。
如有侵权,请联系[email protected] 删除。
我来说两句