1、测试文件
2、加载readxl包、读取数据
> library(readxl) ## 加载readxl包
> dir()
[1] "test.xlsx"
> sheet1 <- read_xlsx("test.xlsx", sheet = 1, col_names = F) ## 利用read_xlsx函数读取文件， 读取sheet1
New names:
• `` -> `...1`
• `` -> `...2`
> sheet1 <- as.data.frame(sheet1)
> sheet1
...1 ...2
1 aa 300
2 bb 400
3 cc 500
> sheet2 <- read_xlsx("test.xlsx", sheet = 2, col_names = F) ## 读取sheet2
New names:
• `` -> `...1`
• `` -> `...2`
> sheet2 <- as.data.frame(sheet2)
> sheet2
...1 ...2
1 1000 xxx
2 3000 yyy
3 5533 zzz
本文章为转载内容，我们尊重原作者对文章享有的著作权。如有内容错误或侵权问题，欢迎原作者联系我们进行内容更正或删除文章。
