Question

上下文：10个文件。 csv，每个文件包含一个包含5列的日期框架：名称，出生日期，性别，态度和结果。每行都有一个名字，出生日期，性别，态度和结果。

问题：每个态度都有结果。每种态度都出口在一条线上。很快，每个注册态度都有几行。

目标：从每个文件中提取具有记录其结果的一组态度的个人。

ext {
atlist <- as.list(x1, x2, x3, x4, x5, x6, x7, x8)
library(dplyr)
setwd("~/")
files_list <- list.files(x, full.names=TRUE)
dat <- data.frame()
fim <-  data.frame()
for (i in 1:10) {                                
    dat <- (read.csv(files_list[i]))
    dat <- dat %>% filter(attitude == "atlist")
    fim <- rbind(fim, dat)
  }
  fim
}

我已经挣扎了一段时间。有人能帮助我吗？

Answer 1

我不确定你在问什么，因为不清楚x1，x2，x3等是什么，但是如果每个人都表达的态度是你想要过滤，也许你想做以下事情：

atlist <- c(x1, x2, x3, x4, x5, x6, x7, x8)
setwd("~/")
files_list <- list.files(full.names=TRUE)
fim <-  NULL
for (i in 1:10) {                                
    dat <- (read.csv(files_list[i]))
    dat <- dat[dat$attitude %in% atlist,]
    fim <- rbind(fim, dat)
}

R中变量列表的子集行

1 个答案: