Zdefiniuj wszystkie funkcje w jednym pliku .R, wywołaj je z innego pliku .R. Jak, jeśli to możliwe?

Jak wywołać funkcje zdefiniowane w pliku abc.R w innym pliku, powiedzmy xyz.R?

Dodatkowe pytanie brzmi: jak wywołać funkcje zdefiniowane w abc.R z wiersza poleceń / wiersza poleceń R?

Możesz wywołać, source("abc.R")a następnie source("xyz.R")(zakładając, że oba te pliki znajdują się w twoim bieżącym katalogu roboczym.

Jeśli abc.R to:

fooABC <- function(x) {
    k <- x+1
    return(k)
}

a xyz.R to:

fooXYZ <- function(x) {
    k <- fooABC(x)+1
    return(k)
}

to zadziała:

> source("abc.R")
> source("xyz.R")
> fooXYZ(3)
[1] 5
> 

Nawet jeśli istnieją cykliczne zależności, to zadziała.

Np. Jeśli abc.R to:

fooABC <- function(x) {
    k <- barXYZ(x)+1
    return(k)
}

barABC <- function(x){
    k <- x+30
    return(k)
}

a xyz.R to:

fooXYZ <- function(x) {
    k <- fooABC(x)+1
    return(k)
}

barXYZ <- function(x){
    k <- barABC(x)+20
    return(k)
}

następnie,

> source("abc.R")
> source("xyz.R")
> fooXYZ(3) 
[1] 55
>