R语言-循环读取excel内全部sheet

Python08

R语言-循环读取excel内全部sheet,第1张

excel_path <- c("C:/Users/lvjs9/Desktop/excel.xlsx")

inverse_unf_l<- read_excel(excel_path,1)[0]

for (i in (1:length(excel_sheets(excel_path)))){

inverse_unf_l <- rbind(inverse_unf_l , read_excel(excel_path,i))

}

for循环结构语法：

其中var表示循环变量，seq为向量，expr为执行的语句。

例1 下面我们通过for循环来计算

因此

例2 Fibonacc数列为： ，求Fibonacc数列前50项的和。

运行结果

因此Fibonacc数列前50项的和为32951280098。