meanR.Results: Average of results for all active users.

Description Usage Arguments Details Value Examples

View source: R/meanR.Results.R

Description

Average of MAE and elapsed time for all active users.

Usage

1
meanR.Results(obj_Results)

Arguments

obj_Results

An object of class "Results".

Details

Due to the difference in the results of each active user, the average of all active users is calculated.

Value

An object of class "meanR.Results", a list with components:

call

The call used.

mean_MAE_Pearson

Average of MAE obtained from the "Pearson" method for all active users.

mean_MAE_NewKNN

Average of MAE obtained from the "NewKNN" method for all active users.

mean_MAE_Genetic

Average of MAE obtained from the "Genetic" method for all active users.

diff_MAE_GA_Pearson

The difference of MAE in the "Pearson" method and "Genetic" algorithm.

mean_Time_Pearson

Average of the elapsed time of the "Pearson" method for all active users.

mean_Time_NewKNN

Average of the elapsed time of the "NewKNN" method for all active users.

mean_Time_GA

Average of the elapsed time of the "Genetic" method for all active users.

Examples

 1
 2
 3
 4
 5
 6
 7
 8
 9
10
11
12
13
14
ratings <- matrix(c(  2,    5,  NaN,  NaN,  NaN,    4,
                    NaN,  NaN,  NaN,    1,  NaN,    5,
                    NaN,    4,    5,  NaN,    4,  NaN,
                      4,  NaN,  NaN,    5,  NaN,  NaN,
                      5,  NaN,    2,  NaN,  NaN,  NaN,
                    NaN,    1,  NaN,    4,    2,  NaN),nrow=6,byrow=TRUE)

active_users <- c(1:dim(ratings)[2])

Results.out <- Results(ratings, active_users, Threshold_KNN=4, max_scour=5, 
                     min_scour=1, PopSize=100, MaxIteration=50, 
                     CrossPercent=70, MutatPercent=20)
                     
meanR.Results.out <- meanR.Results (obj_Results=Results.out)

GACFF documentation built on Dec. 20, 2019, 5:07 p.m.