Question

我需要66个数据框来转换＆＃34;日期＆＃34;专栏＆＃34; as.Date＆＃34;。我不知道怎么一次做到这一点。我是这样的：

dat2003q1$Date<-as.Date(as.character(dat2003q1),format="%m/%d/%Y")
dat2003q2$Date<-as.Date(as.character(dat2003q2),format="%m/%d/%Y")
dat2003q3$Date<-as.Date(as.character(dat2003q3),format="%m/%d/%Y")

等等......

有一种方法可以同时为所有数据帧执行此操作吗？我找到了同一数据框中多列的解决方案，但不是这样的。

韩国社交协会

Answer 1

尝试

lst <- lapply(mget(ls(pattern='^dat2003q\\d+')), function(x) {
                     x$Date <- as.Date(as.character(x$Date), format='%m/%d/%Y')
                       x})

如果您想使用此更改更新全局环境中的datasets（这不是建议的，因为您可以在列表中执行所有必要的操作，稍后您可以使用{{1}保存数据集}）

read.table

Answer 2

我列出了我工作目录中所有数据框的列表，所以

csv_names = list.files(pattern="*.csv")
my_data <- list()
for (i in seq_along(csv_names)) {
my_data[[i]] <- read.csv(file = csv_names[i], sep = ";")
}

所以，我有一个名称 my_data 的列表，其中包含那些CSV文件或数据框吗？ @akrun，我想格式化as.date到我的数据帧的DATE列到列表中。你知道或知道如何做到这一点吗？

转换as.Date：一次多个数据帧

2 个答案: