美文网首页
神经网络

神经网络

作者: Socrates1024 | 来源:发表于2016-11-24 18:01 被阅读0次

BP网络#

library(ggplot2)
library(lattice)
library(kernlab)
library(caret)

train <- createDataPartition(y=iris$Species, p=0.75, list=FALSE)
training <- iris[train,]
testing <- iris[-train,]

library(nnet)

iris.nnet <-nnet(Species ~ ., linout = F, size = 10, decay = 0.01, maxit = 1000, trace = F, data = training)
table(predict(iris.nnet, testing, type='class'), testing$Species)       

相关文章

网友评论

      本文标题:神经网络

      本文链接:https://www.haomeiwen.com/subject/fuzbpttx.html