R语言_驾驶员事故预测

# Title     : TODO
# Objective : TODO
# Created by: johnchen
# Created on: 2020/4/24/024
library(openxlsx)
#读取例子5.1数据
d5.1 = read.xlsx('mvstats5.xlsx','d5.1')
logit = glm(y~x1+x2+x3, family = binomial, data = d5.1)#logistic模型，family是二项分布
logit.step = step(logit)
#预测视力正常司机logistic回归结果
pre1 = predict(logit.step, data.frame(x1 = 1))
#预测视力正常司机发生事故概率
p1 = exp(pre1)/(1 + exp(pre1))
##预测视力有问题司机logistic回归结果
pre2 = predict(logit.step,data.frame(x1 = 0))
#预测视力有问题司机发生事故概率
p2 = exp(pre2)/(1 + exp(pre2))
c(p1,p2)#结果显示

R语言_驾驶员事故预测相关推荐

R语言ARIMA-GARCH波动率模型预测股票市场苹果公司日收益率时间序列
原文链接:http://tecdat.cn/?p=23934 在本文中,我们将尝试为苹果公司的日收益率寻找一个合适的 GARCH 模型(点击文末"阅读原文"获取完整代码数据). 相 ...
基于R语言对股市价格预测的ARIMA建模
基于R语言对股市价格预测的ARIMA建模获取数据 tushare ID=399224 利用ARIMA对股市价格进行拟合后预测,本次实验的数据源于tushare 首先导入本次实验所需要的所有包 req ...
R语言ARIMA集成模型预测时间序列分析
全文链接:http://tecdat.cn/?p=18493 本文我们使用4个时间序列模型对每周的温度序列建模.第一个是通过auto.arima获得的,然后两个是SARIMA模型,最后一个是Buys- ...
基于R语言的时间序列分析预测
数据来源: R语言自带 Nile 数据集(尼罗河流量) 分析工具:R-3.5.0 & Rstudio-1.1.453 #清理环境,加载包 rm(list=ls()) library(forec ...
二元置信椭圆r语言_医学统计与R语言：圆形树状图（circular dendrogram）
微信公众号:医学统计与R语言如果你觉得对你有帮助,欢迎转发输入1: "ggraph") 结果1: name 输入2: <- graph_from_data_frame(my ...
二元置信椭圆r语言_医学统计与R语言：多分类logistic回归HosmerLemeshow拟合优度检验...
微信公众号:医学统计与R语言如果你觉得对你有帮助,欢迎转发输入1:multinominal logistic regression "nnet") 结果1: test (mult ...
2线性模型 r语言_多层线性模型在R语言上的实现（三）
终于有时间写新的一篇HLM在R语言的实现,有读者私信我,说写文章幅度比较小.我这里要说明下我主要想采用"小步快走"的思维给大家展示这个过程,如果一篇文章篇幅太大,我相信很多人也是看 ...
R语言逻辑回归的预测概率怎么算
在R语言直接通过predict 计算概率手动计算可能不会, 我的逻辑回归模型如上所示, 预测就是 predict(fit.logit,newdata = data.frame(Pregnancie ...
R语言使用ARIMA模型预测股票收益时间序列
"预测非常困难,特别是关于未来".丹麦物理学家尼尔斯·波尔(Neils Bohr),最近我们被要求撰写关于arima的研究报告,包括一些图形和统计输出. 很多人都会看到这句名言.预 ...

R语言_驾驶员事故预测

R语言_驾驶员事故预测相关推荐

最新文章

热门文章