Data Summary

##       Models1    z1       alpha1    j1        Number1       
##  MNL-CE1l :15   0 :24   0.001:40   0 :30   Min.   :  1.985  
##  MNL-CE1nl:15   40:24   0.01 :40   1 :30   1st Qu.: 62.203  
##  MNL-CE2l :45   50:24   0.1  :40   10:30   Median : 98.700  
##  MNL-CE2nl:45   60:24              20:30   Mean   :184.865  
##                 80:24                      3rd Qu.:204.000  
##                                            Max.   :907.200  
##   Probability1      
##  Min.   :2.227e-05  
##  1st Qu.:1.263e-04  
##  Median :2.035e-04  
##  Mean   :3.936e-04  
##  3rd Qu.:2.721e-04  
##  Max.   :9.419e-03

Experiment for z-values vs. Number of items to recommend

Experiment for z-values vs. No-Choice probability

Experiment for alpha values vs. Number of items to recommend

Experiment for alpha values vs. No-choice

Experiment comparing the same model for different z and alpha values

par(mfrow=c(3,2))
dfx1<-subset(dfnew, Models1=="MNL-CE1l")
boxplot(Number1~z1, data=dfx1, main="Variability of z for MNL-CE1l",
        xlab="All z values",ylab="Number to recommend")

dfx2<-subset(dfnew, Models1=="MNL-CE1nl")
boxplot(Number1~z1, data=dfx2, main="Variability of z for MNL-CE1nl",
        xlab="All z values",ylab="Number to recommend")

dfx3<-subset(dfnew, Models1=="MNL-CE2l")
boxplot(Number1~z1, data=dfx3, main="Variability of z for MNL-CE2l",
        xlab="All z values",ylab="Number to recommend")

dfx4<-subset(dfnew, Models1=="MNL-CE2nl")
boxplot(Number1~z1, data=dfx4, main="Variability of z for MNL-CE2nl",
        xlab="All z values",ylab="Number to recommend")

##Alpha values
par(mfrow=c(3,2))

boxplot(Number1~alpha1, data=dfx1, main="Variability of alpha for MNL-CE1l",
        xlab="All alpha values",ylab="Number to recommend")

boxplot(Number1~alpha1, data=dfx1, main="Variability of alpha for MNL-CE1nl",
        xlab="All alpha values",ylab="Number to recommend")

boxplot(Number1~alpha1, data=dfx3, main="Variability of alpha for MNL-CE2l",
        xlab="All alpha values",ylab="Number to recommend")

boxplot(Number1~alpha1, data=dfx4, main="Variability of alpha for MNL-CE2nl",
        xlab="All alpha values",ylab="Number to recommend")