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

library(\"ISLR\") // for obtaining auto dataset//

data = https://mparticle.uc.cn/api/Auto

View(data)

plot(data$weight_lbs data$mp_g pch=data$origin_ccex=2)

par(mfrow=c(22))

plot(data$cylinders_48 data$mp_g pch=data$origin_ccex=1)

plot(data$dis_placement data$mp_g pch=data$origin_ccex=1)

plot(data$horse_power data$mp_g pch=data$origin_ccex=1)

plot(data$acceleration_mph data$mp_g pch=data$origin_ccex=1)

mean_data <- apply(data[1:6
2 mean)

sd_data <- apply(data[1:6
2 sd)

data_scaled <- as.data.frame(scale(data[1:6
center = mean_data scale = sd_data))

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