R语言神经网络模型

最新推荐文章于 2024-09-11 18:34:56 发布

智能统计

最新推荐文章于 2024-09-11 18:34:56 发布

阅读量262

点赞数 4

分类专栏： R语言基础文章标签：深度学习机器学习人工智能 r语言

本文链接：https://blog.csdn.net/qq_37610365/article/details/141089617

版权

#####################################################################
###Chapter 1 - Introduction to Neural Networks - using R ############
###Simple R program to build, train, test regression neural networks#
#####################################################################
install.packages("neuralnet")
install.packages("MASS")
library("neuralnet")
library(MASS)

set.seed(1)

data = Boston

max_data <- apply(data, 2, max)
min_data <- apply(data, 2, min)
data_scaled <- scale(data,center = min_data, scale = max_data - min_data)

index = sample(1:nrow(data),round(0.70*nrow(data)))
train_data <- as.data.frame(data_scaled[index,])
test_data <- as.data.frame(data_scaled[-index,])

n = names(data)
f = as.formula(paste("medv ~", paste(n[!n %in% "medv"], collapse = " + ")))
net_da