opakowania ścieżek względnych w R

Question

Napisałem kilka funkcji dla opakowania, które używają ścieżek względnych jak:

"./data/foobar.rds" 

Oto przykład funkcja:

foo <- function(x) { 
x <- readRDS("./data/bar.rds") 
return(x) 
} 

Teraz, gdybym miał być pracując na ścieżce rozwoju pakietu, działa to tak, jak oczekuję. Ale kiedy ładuję pakiet, ta ścieżka używa bieżącego katalogu roboczego zamiast względnej ścieżki pakietu.

W jaki sposób ustawić tak, aby ścieżka do funkcji w pakiecie utrzymywała się w ścieżce względnej?

Answer 1

Jak zauważa Andrie, można użyć system.file, która "znajduje pełne nazwy plików w paczkach itp."

x <- readRDS(system.file("help", "aliases.rds", package="MASS"))