r - 访问 R 包中的子目录

Question

我在 R 包中有一个数据文件夹。在数据目录中，我有一个子目录 data/JE。我想访问这个目录并应用 list.file 函数，然后使用我想读取每个文件的列表。不运行包时我可以 setwd() 。但是，当程序包运行时，我不知道如何访问该目录。

     JESP = system.file("data/JE",package="DNA_test")
     listoffiles <- list.files(path=JESP)

要访问 pacakg 中的文件，我使用 system.file 函数。但我不知道如何访问目录并从中读取文件。我在循环中使用以下语句来读取

     check <- as.matrix(read.csv(file=listoffiles[j],sep=",",header=FALSE))

Answer 1

您应该能够修改它以满足您的需要：

> packagePath <- find.package("survival", lib.loc=NULL, quiet = TRUE)
> packagePath
[1] "/Library/Frameworks/R.framework/Versions/3.0/Resources/library/survival"

> list.files(packagePath)
 [1] "CITATION"    "data"        "DESCRIPTION" "doc"         "help"        "html"       
 [7] "INDEX"       "libs"        "Meta"        "NAMESPACE"   "NEWS.Rd"     "R"          
> list.files(paste0(packagePath, "/data") )
[1] "Rdata.rdb" "Rdata.rds" "Rdata.rdx"

如果您需要进一步了解其system.file工作原理，只需键入

system.file