# NOT RUN {
WinningModel <- AutoRecommender(RatingsMatrix,
                                Partition = "Split",
                                KFolds = 1,
                                Ratio = 0.75,
                                Given = 1,
                                RatingType = "TopN",
                                RatingsKeep = 20,
                                SkipModels = "AssociationRules",
                                ModelMetric = "TPR")
# }
Run the code above in your browser using DataLab