تصور الشبكة العصبية مع R.

2018 11 年 月 日 14

حزمة تصور الشبكة العصبية في R

يمكن لوظيفة الشبكة العصبية تصور الرسم البياني للحساب من خلال وظيفة المؤامرة () كمعيار. لاحظ أدناه كيفية تصور الرسم البياني الحسابي عند استخدام حزم الشبكة العصبية الأخرى التي لا تحتوي على ميزات مثل وظيفة الشبكة العصبية.

  • وظيفة plot.nn
  • وظيفة الشبكة

تحضير

بيانات العينة تستخدم القزحية

خلق المتعلم

d = iris d $ الأنواع <-as.factor (d $ Species) #train_test_split set.seed (0) sample <-sample.int (n = nrow (d)، size = floor (0.80 * nrow (d))، استبدل = F) تدريب <-d [عينة ،] اختبار <-d [-sample ،] ملخص (قطار) #nnet library (nnet) nn1 = nnet (الأنواع ~. ، الحجم = 5 ، البيانات = القطار) pred_nn1 <- توقع (nn1، test، type = "class") جدول (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 (~. ، البيانات = القطار) الدمية <-as.data.frame (التنبؤ (tmp ، القطار)) المكتبة ("الشبكة العصبية") f = Species.setosa + Species.versicolor + الأنواع. فيرجينيكا ~ Sepal.Length + Sepal.Width + Petal.Length + Petal.Width nn2 <-neuralnet (الصيغة = f ، البيانات = وهمية) مؤامرة (nn2)

 

عندما يكون هناك العديد من المتغيرات ، يكون من الأسهل رؤية التصور باستخدام وظيفة الشبكة الأفقية. تعد وظيفة plotnet سهلة الاستخدام لأنها لا يمكنها تصور الشبكات العصبية التي تم إنشاؤها باستخدام RSNNS وحرف الإقحام ولديها مجموعة واسعة من التطبيقات.