install.packages("neuralnet")
install.packages("dplyr")
require(neuralnet)
NBA_Data <- read.csv("C:\\Users\\Andrew\\Downloads\\NBA_Test.csv",TRUE)
df <- data.frame(NBA_Data)
training <- data.frame(head(df,10))
tester <- data.frame(tail(df,20))
ast <- c(list(training[20]))
pts <- c(list(training[25]))
wins <- c(list(training[26]))
net_test <- data.frame(ast,pts,wins)
nn=neuralnet(wins~ast+pts,data=net_test, hidden=3,act.fct = "logistic",
linear.output = FALSE)
Я пытаюсь начать с нейронных сетей, и я начинаю с того, что пытаюсь формировать и тренироваться с двумя входами (голевая передача и очки) и одним выходом (выигрыш). Когда я запускаю приведенный выше код, я получаю эту ошибку:
Ошибка в model.frame.default (as.formula (call ("~", формула [[2]])), data): неверный тип (список) для переменной 'wins'
Я не уверен, почему мой тип переменной здесь недопустим. Любое понимание приветствуется. Спасибо!
Ниже приведен net_test data.frame, который я создал и на который ссылаюсь в коде:
AST PTS WINS
1 1228 5800 45
2 1191 5749 14
3 1226 5652 36
4 1243 5355 23
5 1224 5626 16
6 1160 5512 19
7 1276 6155 13
8 1390 5831 32
9 1326 5967 37
10 1336 5640 19