select 来自多个数据帧的值 (file.csv) 并使用 R 将它们合并到一个新的数据帧中

Question

也许我要求的太简单了，但我无法解决这个问题。我想创建一个脚本，递归地输入 base_folder 中存在的文件夹，打开一个名称始终相同的特定文件 (w3nu) 并且 selects 是一个精确的值 (我需要select属于Response栏的主题邮箱，过滤出Question.Key栏对应的热度。

我希望我的脚本以相同的方式为基础文件夹中存在的所有文件夹重复自身。

最后，我想将所有电子邮件合并到一个新的数据框中。

我创建了这个脚本，但它不起作用。

 library(tidyverse)

base_folder <- "data/raw/exp_1_participants/sbj"

files <- list.files(base_folder, recursive = TRUE, full.names = TRUE)
demo_email <- files[str_detect(files, "w3nu")]

email_extraction <- function(demo_email){
  
  demo_email <- read.csv(task,header = T)
  demo_email <- demo_email %>%
    filter(Question.Key == "respondent-email") %>%
    select(Response)
}
  
  email_list_jolly <- vector(mode = "list", length = length(demo_email))
  
  for(i in 1:length(email_list_jolly)){
email_list_jolly[[i]] <- email_extraction(demo_email[i])
  }
  
  email_list_stud <- cbind(email_list_jolly)
  
  write.csv(email_list_stud, 'data/cleaned/email_list_stud.csv')

你能帮帮我吗？谢谢

Answer 1

来自评论：

您似乎没有在上面显示的脚本中定义任务，但您告诉 read.csv 找到它。您是想将 demo_email 传递给 read.csv 吗？ task 可能是您工作区中的随机向量。

select 来自多个数据帧的值 (file.csv) 并使用 R 将它们合并到一个新的数据帧中

select a value from several dataframes (file.csv) and merge them into a new dataframe with R

r

dataframe

merge

tidyverse

cbind