Dodawanie obiektów razem w R (jak warstwy ggplot)

Question

Robię OOP R i zastanawiałem się, jak to zrobić, aby + może być używany do dodawania niestandardowych obiektów razem. Najpopularniejszym przykładem tego, co znalazłem, jest ggplot2 w/dodawanie geomów razem.

Czytam poprzez kod źródłowy ggplot2 i znaleźć ten

https://github.com/hadley/ggplot2/blob/master/R/plot-construction.r

Wygląda "%+%" jest używany, ale nie jest jasne, w jaki sposób ostatecznie przekłada się na zwykłym + operatora.

Answer 1

Wystarczy tylko zdefiniować metodę dla ogólnej funkcji +. (W linku w pytaniu ta metoda jest "+.gg", zaprojektowana do wysyłania przez argumenty klasy "gg"). :

## Example data of a couple different classes 
dd <- mtcars[1, 1:4] 
mm <- as.matrix(dd) 

## Define method to be dispatched when one of its arguments has class data.frame 
`+.data.frame` <- function(x,y) rbind(x,y) 

## Any of the following three calls will dispatch the method 
dd + dd 
#   mpg cyl disp hp 
# Mazda RX4 21 6 160 110 
# Mazda RX41 21 6 160 110 
dd + mm 
#   mpg cyl disp hp 
# Mazda RX4 21 6 160 110 
# Mazda RX41 21 6 160 110 
mm + dd 
#   mpg cyl disp hp 
# Mazda RX4 21 6 160 110 
# Mazda RX41 21 6 160 110