R语言对文件夹及文件的操作

R语言对文件夹及文件的操作
rm(list=ls())
path = ‘J:/lab/EX29 –在R语言中进行文件(夹)操作’
setwd(path)
cat(“file A\n”, file=”A”) #创建一个文件A,文件内容是’file A’,’\n’表示换行,这是一个很好的习惯
cat(“file B\n”, file=”B”) #创建一个文件B
file.append(“A”, “B”) #将文件B的内容附到A内容的后面,注意没有空行
file.create(“A”) #创建一个文件A, 注意会覆盖原来的文件
file.append(“A”, rep(“B”, 10)) #将文件B的内容复制10便,并先后附到文件A内容后
file.show(“A”) #新开工作窗口显示文件A的内容
file.copy(“A”, “C”) #复制文件A保存为C文件,同一个文件夹
dir.create(“tmp”) #创建名为tmp的文件夹
file.copy(c(“A”, “B”), “tmp”) #将文件夹拷贝到tmp文件夹中
list.files(“tmp”) #查看文件夹tmp中的文件名
unlink(“tmp”, recursive=F) #如果文件夹tmp为空,删除文件夹tmp
unlink(“tmp”, recursive=TRUE) #删除文件夹tmp,如果其中有文件一并删除
file.remove(“A”, “B”, “C”) #移除三个文件

https://blog.csdn.net/u011596455/article/details/79617608?utm_medium=distribute.pc_relevant.none-task-blog-baidujs_utm_term-0&spm=1001.2101.3001.4242

1.查看目录与文件
getwd() #获得当前工作目录

setwd(" ") #设置当前工作目录

dir() #查看当前目录下的子目录和文件

list.dirs() #查看当前目录下的子目录

dir(path = “./293T/pictures”) #查看指定路径下的子目录和文件

file.info(".") #查看当前目录的信息
1
2
3
4
5
6
7
8
9
10
11
2.检查目录和文件
file.exists("./other") #检查目录是否存在,文件同理

file_test("-f", “293T”) #"-f"判断是否为文件, "-d"判断是否为目录
1
2
3
3.创建目录和文件
创建目录使用dir.create()
当创建多级目录时,令recursive = TRUE即可。
创建空文件使用file.create()

4.删除目录和文件
有两个函数可以使用file.remove和unlink,其中unlink函数使用同删除目录操作是一样的。

5.目录与文件的其他操作
system(“tree”) #通过系统命令查看目录结构
file.rename(“293T”, “HEK_293T”) #重命名
file.copy(from, to) #复制文件
————————————————
版权声明:本文为CSDN博主「Loud丶」的原创文章,遵循CC 4.0 BY-SA版权协议,转载请附上原文出处链接及本声明。
原文链接:https://blog.csdn.net/Loud__/article/details/98724087

复制文件
复制文件到指定文件夹
file.copy(c(fileaddress1,fileaddress2),diraddress)
#例如:
file.copy(c(“A.txt”, “B.txt”), “tmp”)
1
2
3
覆盖复制
#C.txt已存在,设置overwrite = TRUE进行覆盖
file.copy(“D.txt”, “C.txt”, overwrite = TRUE)
1
2
追加复制
#将B.txt文件的内容添加到A.txt文件中
file.append(“A.txt”,“B.txt”)

#复制D.txt中的内容10遍,添加到文件A.txt和B.txt
file.append(c(“A.txt”, “B.txt”), rep(“D.txt”, 10))
1
2
3
4
5
返回上一级路径
dirname(myaddress)
1
查看某一文件夹是否存在
dir.exists(address)
1
#查看某一文件是否存在

file.exists(address)
1
创建文件夹
dir.create(address)
1
删除文件夹
unlink(c(dir_address,…),recursive=TRUE)
#例子:
unlink(“tmp”, recursive = TRUE)
————————————————
版权声明:本文为CSDN博主「zoujiahui_2018」的原创文章,遵循CC 4.0 BY-SA版权协议,转载请附上原文出处链接及本声明。
原文链接:https://blog.csdn.net/qq_18055167/article/details/103218000

  • 0
    点赞
  • 11
    收藏
    觉得还不错? 一键收藏
  • 0
    评论

“相关推荐”对你有帮助么?

  • 非常没帮助
  • 没帮助
  • 一般
  • 有帮助
  • 非常有帮助
提交
评论
添加红包

请填写红包祝福语或标题

红包个数最小为10个

红包金额最低5元

当前余额3.43前往充值 >
需支付:10.00
成就一亿技术人!
领取后你会自动成为博主和红包主的粉丝 规则
hope_wisdom
发出的红包
实付
使用余额支付
点击重新获取
扫码支付
钱包余额 0

抵扣说明:

1.余额是钱包充值的虚拟货币,按照1:1的比例进行支付金额的抵扣。
2.余额无法直接购买下载,可以购买VIP、付费专栏及课程。

余额充值