Búsqueda de métodos en genéricos primitivos

Programación orientada a objetos con S3 y R6 en R

Richie Cotton

Data Evangelist at DataCamp

Escribir código
Depurar código
Mantener código

Ejecutar código

R vs. C

El código en C suele ser más rápido
El código en R suele ser más fácil de escribir
... y más fácil de depurar

ch2_3-method-lookup-for-primitive-generics.012.png

ch2_3-method-lookup-for-primitive-generics.013.png

exp

function (x)  .Primitive("exp")

function (e1, e2)  .Primitive("+")

if

.Primitive("if")

sin

function (x)  .Primitive("sin")

function (e1, e2)  .Primitive("-")

for

.Primitive("for")

.S3PrimitiveGenerics

"anyNA"          "as.character"   "as.complex"
"as.double"      "as.environment" "as.integer"     
"as.logical"     "as.call"        "as.numeric"
"as.raw"         "c"              "dim"           
"dim<-"          "dimnames"       "dimnames<-"     
"is.array"       "is.finite"      "is.infinite"    
"is.matrix"      "is.na"          "is.nan"
"is.numeric"     "length"         "length<-"      
"levels<-"       "names"          "names<-"
"rep"            "seq.int"        "xtfrm"

all_of_time <- c("1970-01-01", "2012-12-21")
as.Date(all_of_time)

"1970-01-01" "2012-12-21"

class(all_of_time) <- "date_strings"
as.Date(all_of_time)

Error in as.Date.default(all_of_time) : 
  do not know how to convert 'all_of_time' to class"Date"

length(all_of_time)

Resumen

Algunas funciones de R están escritas en C
La interfaz primitiva ofrece el mejor rendimiento
.S3PrimitiveGenerics lista los genéricos S3 primitivos
Los genéricos primitivos no dan error si no hay método

¡Vamos a practicar!

Programación orientada a objetos con S3 y R6 en R