Co oznacza tutaj metoda UseMethod?

Question

Jedną z rzeczy kool o R jest to, że wpisuję nazwę funkcji, aby uzyskać implementację. Ale ten jest mylące mnie, rekurencyjnie:

> library(xts) 
> align.time 
function (x, ...) 
{ 
    UseMethod("align.time") 
} 
<environment: namespace:xts> 

x jest obiektem XTS, więc nie ma to znaczy, że będzie ona wywołać metodę align.time XTS ... ale to jest to, czego szukam w! (Wpisanie xts::align.time daje dokładnie taką samą odpowiedź.)

Answer 1

Krótka odpowiedź brzmi, że szukasz funkcji xts:::align.time.xts.

Dłuższa odpowiedź jest taka, że ​​można dowiedzieć się, jakie metody istnieją align.time wywołując methods:

> methods(align.time) 
[1] align.time.POSIXct* align.time.POSIXlt* align.time.xts*  

    Non-visible functions are asterisked 

Ten mówi, że nie jest to metoda align.time.xts które nie są wywożone z obszaru nazw. W tym momencie można się domyślić, że można go znaleźć w pakiecie xts, ale można potwierdzić, że z getAnywhere:

> getAnywhere("align.time.xts") 
A single object matching 'align.time.xts' was found 
It was found in the following places 
    registered S3 method for align.time from namespace xts 
    namespace:xts 
with value 

function (x, n = 60, ...) 
{ 
    if (n <= 0) 
     stop("'n' must be positive") 
    .xts(x, .index(x) + (n - .index(x)%%n), tzone = indexTZ(x), 
     tclass = indexClass(x)) 
} 
<environment: namespace:xts> 

---

Można, oczywiście, czytać źródła bezpośrednio, ale ponieważ funkcja ta jest nie wywiezione, trzeba użyć package:::function (tj trzy dwukropka):

> xts:::align.time.xts 
function (x, n = 60, ...) 
{ 
    if (n <= 0) 
     stop("'n' must be positive") 
    .xts(x, .index(x) + (n - .index(x)%%n), tzone = indexTZ(x), 
     tclass = indexClass(x)) 
} 
<environment: namespace:xts> 

Answer 2

align.time() jest wyprowadzany z XTS nazw, więc xts::align.time i align.time to samo. Trzeba pamiętać, że istnieje align.time() metoda dla obiektów klasy "xts" dostarczonych w opakowaniu i że nie są wywożone z obszaru nazw (jest tylko zarejestrowany jako metoda S3):

> xts:::align.time.xts 
function (x, n = 60, ...) 
{ 
    if (n <= 0) 
     stop("'n' must be positive") 
    .xts(x, .index(x) + (n - .index(x)%%n), tzone = indexTZ(x), 
     tclass = indexClass(x)) 
} 
<environment: namespace:xts> 

Jest to metoda, która jest wywoływana, gdy przekazujesz obiekt "xts" do .

Po wywołaniu align.time()UseMethod() ustawia wyszukiwanie i wywołanie odpowiedniej metody "align.time", jeśli jest dostępna, dla klasy obiektu podanego jako pierwszy argument. UseMethod robi dokładnie to, co myślisz, że robisz, po prostu pomyliłeś się, patrząc na tę samą funkcję (ogólną) na dwa różne sposoby.