# Predictions to study how relevant the quality attribute is in relation to the price rows <- profiles[c(48, 33, 15, 36, 18), ] predictions_2 <- predict.mnl(m1, rows) tibble::tibble(head(predictions_2, )) ```
