obtenir les résutats de sortie GLM en csv

bonjour,
j'essaye de sortir la table de résultats de ma régression logistique multinomiale en csv mais je n'y parviens pas  : j'ai sois des csv vides (avec le code ci-dessous), soit le message "$ operator is invalid for atomic vectors").
J'utilise un code similaire à celui que j'employais pour avoir les sorties de régressions linéaires, mais ça ne fonctionne pas avec ce nouveau type de régressions.
j'ai notamment essayé :

Code:

MLM.7 <- multinom(var1 ~ var2 + var3, data=rok, trace=FALSE)
summary(MLM.7, cor=FALSE, Wald=TRUE)
write.csv2(as.data.frame(summary(MLM.7)$coef), file= "/mon chemin d'accès/MLM.7.csv")


et je n'arrive pas non plus à obtenir les p-values associés aux résultats.
Merci d'avance si vous voyez ce qui cloche

j'ai la solution :

Code:

MLM.7 <- multinom(var1 ~ var 2l + var3, data=rok, trace=FALSE)
sort1<-summary(MLM.7, cor=FALSE, Wald=TRUE)
write.csv2(sort1$coefficients, "output2.csv")

il me manque toutefois encore à trouver les termes pour afficher les autres sorties (p values...Etc)