60、逻辑回归在模型参数化中的应用

逻辑回归在模型参数化中的应用

1. 模型参数化与数据处理

在进行模型参数化时,首先要对数据进行处理。保留“Transition”列(第1列),删除第2到第7列以及其他需要删除的列,代码如下:

# Retaining the "Transition" column no 1,
# we thus delete the columns no. 2 … 7
fullData <- fullData[, -c(2:7,cols4deletion)]
# redo the fitting (…like before…)
mdl3 <- bayesglm(Transition ∼., family = "binomial",
data = train)

新拟合的结果以残差偏差表示如下:
| 类型 | 自由度 | 偏差值 | AIC |
| ---- | ---- | ---- | ---- |
| 零偏差 | 224 | 148.472 | |
| 残差偏差 | 202 | 19.823 | 65.823 |

从残差偏差来看,此模型拟合在三种变体中是最好的。不过,还是建议进行明确的模型诊断和合理性检查。

2. 模型诊断与合理性检查

由于返回的值在连续区间[0, 1]内,需要将其转换为0和1以便与验证数据进行比较。这里我们任意选择阈值0.5,具体代码如下:

glft <- predict(object = mdl, newdata =
评论
成就一亿技术人!
拼手气红包6.0元
还能输入1000个字符  | 博主筛选后可见
 
红包 添加红包
表情包 插入表情
 条评论被折叠 查看
添加红包

请填写红包祝福语或标题

红包个数最小为10个

红包金额最低5元

当前余额3.43前往充值 >
需支付:10.00
成就一亿技术人!
领取后你会自动成为博主和红包主的粉丝 规则
hope_wisdom
发出的红包
实付
使用余额支付
点击重新获取
扫码支付
钱包余额 0

抵扣说明:

1.余额是钱包充值的虚拟货币,按照1:1的比例进行支付金额的抵扣。
2.余额无法直接购买下载,可以购买VIP、付费专栏及课程。

余额充值