# Generated by using Rcpp::compileAttributes() -> do not edit by hand
# Generator token: 10BE3573-1514-4C36-9D1C-5A225CD40393
FM <- function(data_, normalize, fm_controls, solver_controls, track_controls, model_list) {
.Call('FMwR_FM', PACKAGE = 'FMwR', data_, normalize, fm_controls, solver_controls, track_controls, model_list)
}
FMPredict <- function(newdata, normalize, model_list, max_threads) {
.Call('FMwR_FMPredict', PACKAGE = 'FMwR', newdata, normalize, model_list, max_threads)
}
FMTrack <- function(newdata, model_list, normalize, type, max_threads) {
.Call('FMwR_FMTrack', PACKAGE = 'FMwR', newdata, model_list, normalize, type, max_threads)
}
normalize <- function(matrix, nthreads = 1L) {
.Call('FMwR_normalize', PACKAGE = 'FMwR', matrix, nthreads)
}
normalize1 <- function(matrix, scales, nthreads = 1L) {
invisible(.Call('FMwR_normalize1', PACKAGE = 'FMwR', matrix, scales, nthreads))
}
NApredict <- function(pred, nas) {
.Call('FMwR_NApredict', PACKAGE = 'FMwR', pred, nas)
}
transpose <- function(sparse_matrix) {
.Call('FMwR_transpose', PACKAGE = 'FMwR', sparse_matrix)
}
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.