從 lapply 的 R 中的 csv 文件中的單元格讀取值

Question

在這段代碼中，有沒有辦法查詢 csv 文件中特定單元格的 integer 值，即第 1 行，第 2 列？ 我知道語法是 [, (2)] 但不確定在這組代碼中的哪里輸入？

wd = setwd("/Users/TK/Downloads/DataCSV")

Groups <- list.dirs(path = wd, full.names = TRUE, recursive = FALSE)
print(Groups)

Subj <- list.dirs(path = Groups, full.names = TRUE, recursive = FALSE)
print(Subj)

for(i in Subj)  {

  setwd(i)
  section_area <- list.files(path = i, pattern = "section_area", 
                             full.names = FALSE, recursive = TRUE)
  print(section_area)
  
  read_area <- lapply(section_area, read.csv)
  print(read_area)
  
}

Answer 1

將相關行更改為以下內容應該可以：

read_area <- lapply(section_area, function(x)read.csv(x)[1,2])