library(tidyverse)
library(mlogit)
library(marginaleffects)
library(parameters)
library(tinytable)
library(scales)
library(ggforce)
<- readRDS("data/processed_data/study_5_sticker.rds") stickers
library(tidyverse)
library(mlogit)
library(marginaleffects)
library(parameters)
library(tinytable)
library(scales)
library(ggforce)
<- readRDS("data/processed_data/study_5_sticker.rds") stickers