R neura lnet пакет: не могу обучить нейронную сеть - PullRequest
0 голосов
/ 27 марта 2020

Я пытаюсь использовать пакет neuralnet для обучения модели на этом наборе данных . Однако я получаю следующую ошибку, которую не могу понять:

Ошибка: производная ошибки содержит NA; изменить, что производная функция не делится на 0 (например, кросс-энтропия)

Это мой код:

library(neuralnet)
library(tidyverse)

framingham <- read_csv('https://courses.edx.org/assets/courseware/v1/7022cf016eefb6d3747447589423dab0/asset-v1:MITx+15.071x+3T2019+type@asset+block/framingham.csv',
                       col_types = cols(.default = 'i',sysBP = 'n', diaBP = 'n', BMI = 'n' ))
# Split data
set.seed(123); train_idx <- sample(nrow(framingham), 2/3 * nrow(framingham))
framingham_train <- framingham[train_idx, ]
framingham_test <- framingham[-train_idx, ]

# Binary classification
nn <- neuralnet(formula = TenYearCHD ~ ., data = framingham_train,
                hidden=c(3,2),
                act.fct = "tanh",
                stepmax = 1e8,
                err.fct = 'ce',
                linear.output = TRUE)

Я пытался изменить функцию ошибки и другие детали, но ничего не работает.

...