Импорт и сохранение файлов с помощью локального макроса, такого как Stata в R

r

#r

Вопрос:

ВСЕ

Я новичок в R, но обычно использую Stata. Я хочу импортировать файлы Excel в R и переименовать некоторые столбцы из каждых 4 файлов соответственно. И я также хочу сохранить его в другой файл, используя только один цикл for .

 s <- "./20211210094220.xlsx"
b <- "./20211210094740.xlsx"
c <- "./20211210095253.xlsx"
g <- "./20211210095616.xlsx"

for (hos in c(s,b,c,g)) {
  drug <- read_excel(hos)
  drug <- rename(drug, "x" = "y")
  drug <- rename(drug, "a" = "b")
  all_of(hos)2 <- drug
}
 

Целевыми файлами являются s, b, c и g, а имена файлов сохранения, которые я хочу сохранить, — s2, b2, c2, g2.

Я ссылался на этот сайт, R для пользователя Stata, и я также знаю, как выполнить этот код, используя локальный макрос в Stata. Но он не запускался.

Пожалуйста, скажите мне, как запустить этот код в R.

Ответ №1:

  1. прочитайте все xlsx файлы в вашем корневом каталоге (или измените, если другие)
  2. одинаковые все в списке df.list
  3. переименование с присвоением names
 library(readxl)
file.list <- list.files(pattern='*.xlsx')
df.list <- lapply(file.list, read_excel)

names(df.list) <- c("s2", "b2", "c2", "g2")
 

Комментарии:

1. Имена не должны быть именами файлов ? Не env. names. Вы могли бы использовать purrr::walk с write_csv.