Визуализация нейронной сети с R
Содержание
Пакет визуализации нейронной сети на R
Функция нейронной сети стандартно может визуализировать график вычислений с помощью функции plot (). Обратите внимание на то, как визуализировать вычислительный граф при использовании других пакетов нейронных сетей, которые не имеют таких функций, как функция нейронной сети.
- функция plot.nn
- функция plotnet
Подготовка
В образцах данных используется радужная оболочка
Создание ученика
d = iris d $ Species <-as.factor (d $ Species) #train_test_split set.seed (0) sample <-sample.int (n = nrow (d), size = floor (0.80 * nrow (d)), replace = F) train <-d [sample,] test <-d [-sample,] summary (train) #nnet library (nnet) nn1 = nnet (Species ~., Size = 5, data = train) pred_nn1 <- предсказать (nn1, test, type = "class") table (test $ Species, pred_nn1)
Визуализировать nnet
В каждом случае цвет указывает положительное или отрицательное значение, а толщина указывает величину числового значения.
функция plot.nn
источник ("http://hosho.ees.hokudai.ac.jp/~kubo/log/2007/img07/plot.nn.txt") plot.nn (nn1)
функция plot.nnet
install.packages ("NeuralNetTools") библиотека (NeuralNetTools) plotnet (nn1)
Кстати, в нейросети функция
библиотека (каретка) tmp <-dummyVars (~., Data = train) dummy <-as.data.frame (прогноз (tmp, train)) библиотека ("нейронная сеть") f = Species.setosa + Species.versicolor + Species. virginica ~ Длина чашечки + Ширина чашечки + Длина лепестка + Ширина лепестка nn2 <-нейронная сеть (формула = f, данные = пустышка) сюжет (nn2)
Когда есть много переменных, легче увидеть визуализацию с помощью функции горизонтального построения графиков. Функцию plotnet легко использовать, потому что она может визуализировать не только nnet, но и нейронные сети, созданные с помощью RSNNS и каретки, и имеет широкий спектр приложений.