r - 保存文件时如何删除部分名称?
问题描述
我有以下脚本:
Files <- list.files(datapath, pattern = ".txt")
# convert all .txt files in the given folder
for (i in 1:length(Files)){
dataname <- Files[i]
filename <- paste(datapath, dataname, sep="")
read_eprime(filename) %>% FrameList() %>% to_data_frame() %>% select(Cue:ISIslide.RT, GetReady.OnsetTime, ScanWait.OffsetTime) %>% slice (-1) %>%
fill(GetReady.OnsetTime, .direction = "up") %>% fill(ScanWait.OffsetTime, .direction = "up") %>% slice (-79) -> edf
write.csv(edf, file = paste0(datapath, dataname, "_P.csv"), na = "", row.names = FALSE)
#write.csv(edf, file=paste0(datapath, "tsv_", dataname), quote=FALSE, sep="\t", na = "")
}
如何调整它,使输出文件不保存名称中间的“.txt”?
解决方案
检查file_path_sans_ext
获取文件名。这来自内置工具包,将仅返回不带扩展名的文件名。
tools::file_path_sans_ext("myFile.txt")
## [1] "myFile"
您也可以使用它而不是将文件路径粘贴到文件名。
tools::file_path_sans_ext("Downloads/Stuff/myFile.txt")
## [1] "Downloads/Stuff/myFile"
推荐阅读
- angular - 在组件中检测到角度循环依赖
- common-lisp - 使用 dolist 宏对列表求和
- javascript - 如何从 JavaScript 代码调用 Eclipse RCP 透视图(Java 类方法)?
- javascript - 如何限制离子输入中的输入?
- amazon-web-services - 将 Uri 中的大写字母替换为小写
- java - Maven 构建 - 类文件大小减小
- amazon-web-services - 使用 AWS lambda 从 s3 对象中读取 n 行
- node.js - 启用 MFA 后如何使用 oauth2 进行 azure ad auth 用户
- mysql - 如何在 5 个嵌套表上执行 MySQL 左连接?
- reactjs - 如何在 React 中使用动画材质 ui 图标