时间戳

首页 > 解决方案 > 在 R 中的数据框中转换多个工作表

r - 在 R 中的数据框中转换多个工作表

问题描述

愚蠢的问题 - 如何改进这段代码？

my_data1 <- read_excel("C:/Users/farj0/Downloads/Pilares_ranking_clp.xlsx", sheet = 1)

my_data2 <- read_excel("C:/Users/farj0/Downloads/Pilares_ranking_clp.xlsx", sheet = 2)

my_data3 <- read_excel("C:/Users/farj0/Downloads/Pilares_ranking_clp.xlsx", sheet = 3)

my_data4 <- read_excel("C:/Users/farj0/Downloads/Pilares_ranking_clp.xlsx", sheet = 4)

k = list(my_data1,my_data2,my_data3,my_data4) %>% reduce(left_join, by = "Município")

谢谢！！

标签： rdataframelapply

解决方案

我们可以遍历sheet数字并将其读入 alist并reduce加入它们

library(purrr)
library(readxl)
library(dplyr)
k <- map(1:4, 
 ~ read_excel("C:/Users/farj0/Downloads/Pilares_ranking_clp.xlsx", 
              sheet = .x)) %>%
         reduce(left_join, by  = "Município")

推荐阅读