gpt4 book ai didi

r - R : multinom in nnet package result different from mlogit in mlogit package? 中的多项逻辑回归

转载 作者:行者123 更新时间:2023-12-04 10:12:51 24 4
gpt4 key购买 nike

两个 R 函数,multinom (包 nnet)和 mlogit (包 mlogit )可用于多项逻辑回归。但是为什么这个例子返回系数的 p 值的不同结果?

#prepare data

mydata <- read.csv("http://www.ats.ucla.edu/stat/data/binary.csv")
mydata$rank <- factor(mydata$rank)
mydata$gre[1:10] = rnorm(10,mean=80000)

#multinom :
test = multinom(admit ~ gre + gpa + rank, data = mydata)
z <- summary(test)$coefficients/summary(test)$standard.errors
# For simplicity, use z-test to approximate t test.
pv <- (1 - pnorm(abs(z)))*2
pv
# (Intercept) gre gpa rank2 rank3 rank4
# 0.00000000 0.04640089 0.00000000 0.00000000 0.00000000 0.00000000

#mlogit :
mldata = mlogit.data(mydata,choice = 'admit', shape = "wide")

mlogit.model1 <- mlogit(admit ~ 1 | gre + gpa + rank, data = mldata)
summary(mlogit.model1)
# Coefficients :
# Estimate Std. Error t-value Pr(>|t|)
# 1:(intercept) -3.5826e+00 1.1135e+00 -3.2175 0.0012930 **
# 1:gre 1.7353e-05 8.7528e-06 1.9825 0.0474225 *
# 1:gpa 1.0727e+00 3.1371e-01 3.4195 0.0006274 ***
# 1:rank2 -6.7122e-01 3.1574e-01 -2.1258 0.0335180 *
# 1:rank3 -1.4014e+00 3.4435e-01 -4.0697 4.707e-05 ***
# 1:rank4 -1.6066e+00 4.1749e-01 -3.8482 0.0001190 ***

为什么 p 值来自 multinormmlogit有那么不同吗?我想这是因为我使用 mydata$gre[1:10] = rnorm(10,mean=80000) 添加了异常值.如果异常值是不可避免的问题(例如在基因组学、代谢组学等中),我应该使用哪个 R 函数?

最佳答案

作为替代方案,您可以使用 broom , 输出 multinom 的整洁格式类模型。

library(broom)

tidy(test)

它将返回 data.frame使用 z 统计量和 p 值。
看看 tidy 文档以获取更多信息。

PS:由于我无法从您发布的链接中获取数据,因此无法复制结果

关于r - R : multinom in nnet package result different from mlogit in mlogit package? 中的多项逻辑回归,我们在Stack Overflow上找到一个类似的问题: https://stackoverflow.com/questions/42048872/

24 4 0
Copyright 2021 - 2024 cfsdn All Rights Reserved 蜀ICP备2022000587号
广告合作:1813099741@qq.com 6ren.com