訪問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