R/rrecsys.R

setMethod("rrecsys", 
          signature = c("_ds"), 
          function(data, alg, ...) {
            
    recom <- rrecsysRegistry$get_entry(alg = alg)
    if (is.null(recom)) 
        stop(paste("Wrong method!!!"))
    
    recom$fun(data, ...)
    
}) 
ludovikcoba/rrecsys documentation built on May 17, 2022, 2:33 a.m.