制作:张敖 https://datahold.cn
【2020-08-17】
增加国内服务器,方便国内使用。
【2020-01-22】
增加记录文件目录。
【2019-12-03】
编写完成,一次性选择多个文件合并。
例如,csv文件1:
Loc | GID | BLUP_Fe | BLUE_Fe | pedigree |
---|---|---|---|---|
1 | 1005209 | 17.28632 | 16.45146 | CLWQZ1716//CLWQHZN19/CLWQHZN77 |
1 | 1005212 | 18.2155 | 18.25768 | CLWQZ1710//CML503/CML557 |
csv文件2:
Loc | GID | BLUP_Fe | BLUE_Fe | pedigree |
---|---|---|---|---|
2 | 1005209 | 17.15545 | 16.91246 | CLWQZ1716//CLWQHZN19/CLWQHZN77 |
2 | 1005212 | 18.48736 | 18.59424 | CLWQZ1710//CML503/CML557 |
合并后:
Loc | GID | BLUP_Fe | BLUE_Fe | pedigree |
---|---|---|---|---|
1 | 1005209 | 17.28632 | 16.45146 | CLWQZ1716//CLWQHZN19/CLWQHZN77 |
1 | 1005212 | 18.2155 | 18.25768 | CLWQZ1710//CML503/CML557 |
2 | 1005209 | 17.15545 | 16.91246 | CLWQZ1716//CLWQHZN19/CLWQHZN77 |
2 | 1005212 | 18.48736 | 18.59424 | CLWQZ1710//CML503/CML557 |
将下列代码复制到Rstudio,请按需求修改下面第一行,然后全选运行。期间会弹出对话框,一次性选择所有需要合并的文件文件即可。
合并完成后,请手动选择文件生成目录。
海外使用:
source("https://aozhangchina.github.io/R/csvRowAddTools/csvRowAddTools.r") # 加载程序文件,需要联网
xx1 <- combineFile()
write.csv(xx1,paste0("GY_11&12_2017.csv"),row.names = F) #? 请修改【GY_11&12_2017.csv】为你自己的文件名。
国内使用:
xxxxxxxxxx
source("https://dataholdcn.cn/R/csvRowAddTools/csvRowAddTools.r") # 加载程序文件,需要联网
xx1 <- combineFile()
write.csv(xx1,paste0("GY_11&12_2017.csv"),row.names = F) #? 请修改【GY_11&12_2017.csv】为你自己的文件名。