Hétérogénéité des préférences pour d'autres caractéristiques

Modélisation des choix pour le marketing avec R

Elea McDonnell Feit

Assistant Professor of Marketing, Drexel University

Une autre façon de coder les facteurs

Codage indiciel (ce que nous faisions)

  seat4 seat5
2     0     0
4     1     0
5     0     1

Codage par effets (mieux pour les modèles hiérarchiques)

   seat4  seat5
2     -1     -1
4      1      0
5      0      1

Modifier le codage d'un facteur

contrasts(sportscar$seat) <- contr.sum(levels(sportscar$seat))

dimnames(contrasts(sportscar$seat))[[2]] <- levels(sportscar$seat)[1:2]

contrasts(sportscar$seat)

Rendre tous les coefficients hétérogènes

my_rpar <- c("n", "n", "n", "n", "n")

m3 <- mlogit(choice ~ 0 + seat + trans + convert + price,
             data = sportscar)
names(my_rpar) <- names(m3$coefficients)

my_rpar

seat4       seat5 transmanual  convertyes       price 
  "n"         "n"         "n"         "n"         "n"

m8 <- mlogit(choice ~ 0 + seat + trans + convert + price, 
             data = sportscar, 
             panel = TRUE, rpar = my_rpar)

Paramètres du modèle hiérarchique

m8 <- mlogit(choice ~ 0 + seat + trans + convert + price, 
              data = sportscar, 
             panel = TRUE, rpar = my_rpar)
plot(m8, par = c("seat4", "seat5")

distributions des paramètres avec codage par effets

Coefficient pour le niveau de base

m8$coef[1:2]

     seat4      seat5 
-0.1852167  0.3519204

-sum(m8$coef[1:2])

-0.1667037

Essayons avec les données `chocolate` !

Modélisation des choix pour le marketing avec R