model <- multinom(categorical_FOD_FODs ~ Condition_FODs + Language_used_FODs + Condition_FODs*Language_used_FODs, indvar_FODs) summary(model) write code for the post-hoc analysis
library(multcomp) plot(glht(model, linfct = mcp(Condition_FODs = "Tukey")))