代码如下
library(readxl)
library(plyr)
setwd('G:\celiang')
filenames <- dir()
data <- data.frame()
for (i in filenames){
path <- paste0(getwd(),'\',i)
data <- (rbind.fill(data,data1<-data.frame(t(read_excel(path = path,range="D1:D15"))
)))}
write.csv(data,file = "G:/celiang/huizong.csv")
本想上传结果图片的,但上传失败了。。。。
类似这样
4 2 3 4
1 1 1 1
1 1 1 1
5 5 6 8
7 2 3 9
求大佬解答
r语言导入excel数据并合并时部分数据缺失、个别行数据变成1怎么解决
- 写回答
- 好问题 0 提建议
- 追加酬金
- 关注问题
- 邀请回答
-
1条回答 默认 最新
悬赏问题
- ¥15 keil的map文件中Image component sizes各项意思
- ¥30 BC260Y用MQTT向阿里云发布主题消息一直错误
- ¥20 求个正点原子stm32f407开发版的贪吃蛇游戏
- ¥15 划分vlan后,链路不通了?
- ¥20 求各位懂行的人,注册表能不能看到usb使用得具体信息,干了什么,传输了什么数据
- ¥15 Vue3 大型图片数据拖动排序
- ¥15 Centos / PETGEM
- ¥15 划分vlan后不通了
- ¥20 用雷电模拟器安装百达屋apk一直闪退
- ¥15 算能科技20240506咨询(拒绝大模型回答)