使用R中的函数加载.txt文件

Question

以下代码有效：

Name<-"s1521r0000_rd2.txt"  
OneFile<-read.table(file=Name, sep="", skip=35, fill=TRUE )

但是，我试图编写一个函数来加载一个.txt文件，以便可以加载所需的任何.txt文件。 我写了下面的功能不起作用：

ReadOneFile<-function(Name="s1521r0000_rd2.txt"){  
 OneFile<-read.table(file=Name, sep="", skip=35, fill=TRUE )  
}  

如果您能帮助我，那就太好了。

Answer 1

您需要将函数中的文件return()到对象中。 例如：

func.readonefile <- function(Name) {
    thefile <- read.table(file=Name,sep="",skip=35,fill=TRUE)
    return(thefile)
}
a_file <- func.readonefile(Name="s1521r0000_rd2.txt")