机器学习第九周作业使用R语言建立BP神经网络
来源:互联网 发布:是知也的知的拼音 编辑:程序博客网 时间:2024/06/05 22:13
数据地址:http://archive.ics.uci.edu/ml/machine-learning-databases/statlog/german/
library(AMORE)
# 数据载入及处理
dat <- read.table('german.data-numeric', header=F)
for (i in 1:25) {
dat[,i] <- as.numeric(as.vector(dat)[,i])
}
# 划分训练集和测试集
train_dat <- dat[1:500,]
test_dat <- dat[501:1000,]
# 进行训练
net <- newff(n.neurons=c(24,8,2,1), learning.rate.global=1e-2, momentum.global=0.5,
error.criterium="LMS", Stao=NA, hidden.layer="tansig",
output.layer="purelin", method="ADAPTgdwm")
result <- train(net, train_dat[1:24], train_dat[25], error.criterium="LMS", report=TRUE, show.step=100, n.shows=5 )
# 进行测试
y <- sim(result$net, test_dat[1:24])
y[which(y<1.5)] <- 1
y[which(y>=1.5)] <- 2
# 计算正确率
sum = 0
for(i in 1:500){
if(y[i]==test_dat[i,25]){
sum =sum+1
}
}
cat("正确率", sum/500, "n")
执行结果为
正确率 0.71
- 机器学习第九周作业使用R语言建立BP神经网络
- 机器学习与R之BP神经网络
- R语言BP神经网络实例
- 机器学习之BP神经网络
- 【R笔记】R机器学习(十四)——BP神经网络
- BP神经网络预测(R语言)
- Stanford机器学习---第五周.BP神经网络算法
- 机器学习系列(6):BP神经网络
- FPGA 机器学习之BP神经网络1
- FPGA 机器学习之BP神经网络2
- FPGA 机器学习之BP神经网络3
- FPGA机器学习之BP神经网络4
- 机器学习(九)初识BP神经网络
- matlab BP神经网络 机器学习 函数逼近
- 机器学习——BP神经网络模型
- 机器学习之神经网络bp算法推导
- 机器学习--BP神经网络的C++实现
- 机器学习(九)初识BP神经网络
- 《java入门第一季》之面向对象静态内部类和非静态内部类的区别
- 多级指标打分表单自动创建JavaScript代码解析
- mariadb卸载
- Android动画--布局动画 LayoutAnimation
- @staticmethod @classmethod @property使用【1】
- 机器学习第九周作业使用R语言建立BP神经网络
- Hibernate的关联映射之N-N关联映射 .
- Android之Activity
- OpenCV将连续图片合成视频AVI
- 学习PS基础教程
- 基于struts2的留言板系统&简单实现jdbc分页
- 软考之路(二)——计算机基础知识总结
- KMP学习笔记
- 线程中一些常用方法的分析