代码详解: 用R语言构建ANN并将其可视化( 八 )_神经网络是一种模拟原始人类思维的计算

head(data_scaled n=20)

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_v(data_scaled)

f = as.formula(paste(\"mpg ~\" paste(n[!n %in% \"mpg\"
collapse = \" + \")))

net = neuralnet(fdata=https://mparticle.uc.cn/api/train_datahidden=3linear.output=TRUE)

plot(net)

predict_net_test <- compute(nettest_data[2:6
)

MSE.net <- sum((test_data$mpg - predict_net_test$net.result)^2)/nrow(test_data)

Lm_Mod <- lm(mpg~. data=https://mparticle.uc.cn/api/train_data)

代码详解: 用R语言构建ANN并将其可视化( 八 )