मैंने ऑर्डिनल लॉजिस्टिक रिग्रेशन पर एनोवा परीक्षण किया है, और मैं वर्ड में परिणाम निर्यात करने की कोशिश कर रहा हूं, लेकिन tab_df पी-वैल्यू पर सितारों को प्रिंट नहीं करता है। मैं सितारों को पी-मानों में कैसे जोड़ सकता हूं? यह कोड है:

parallel.model<- polr(ordD9~ D1d+D1+D7+D8+D10+D12+D13+D15+D16+D17+D5_3+MODOINT,data=dati2,Hess = T)

v<-Anova(parallel.model)

library(sjPlot)

tab_df(v,title = "Anova on parallel.model",
       digits = 3,p.style = "stars",file = "bbb2.doc", encoding = "Windows-1252")
0
Pier 21 अक्टूबर 2020, 13:01

1 उत्तर

सबसे बढ़िया उत्तर

आपको सितारों को स्पष्ट रूप से जोड़ना चाहिए क्योंकि tab_df पैराम्स का उपयोग नहीं करता है:

signif <- symnum(an$`Pr(>F)`, corr = FALSE, na = FALSE, 
                  cutpoints = c(0, 0.001, 0.01, 0.05, 0.1, 1), 
                  symbols = c("***", "**", "*", ".", " "))
an$`Pr(>F)`<- paste0(round(an$`Pr(>F)`, 3), format(signif))
tab_df(v, title = "Anova on parallel.model", footnote=paste0('Legend : ', attr(signif, "legend")), 
        show.footnote = TRUE, digits = 3, file = "bbb2.doc", encoding = "Windows-1252")
0
Abdessabour Mtk 21 अक्टूबर 2020, 17:13