神經網路

統計軟體 R 簡介 安裝 操作方式 變數與運算 有序數列 向量 矩陣 多維陣列 複數 因子 串列 資料框 時間數列 流程控制 輸出入 呼叫 函數 2D 繪圖 3D 繪圖 互動介面 套件列表 其他語言呼叫 R 的應用 集合 邏輯推論 模糊邏輯 機率邏輯 檢定 搜尋 優化算法 線性代數 決策樹 人工智慧 分群分類 SVM 向量機 神經網路 遺傳演算法 資料採礦 訊號處理 影像處理 語音處理 自然語言 機器學習 機器人 生物統計 數位訊號處理 方程式求解 數值分析 微積分 微分方程 線性規劃 圖形理論 統計推論 字串處理 正規表示式 視窗程式 網頁程式 文件格式 貝氏網路 訊息 機率統計書 相關網站 參考文獻 最新修改 簡體版 English

文章 neural network animation in R — https://www.youtube.com/watch?v=gY9DewL6Dqk 實驗 參考：http://gekkoquant.com/2012/05/26/neural-networks-with-r-simple-example/ > install.packages('neuralnet') 嘗試 URL 'http://cran.csie.ntu.edu.tw/bin/windows/contrib/3.0/neuralnet_1.32.zip' Content type 'application/zip' length 58718 bytes (57 Kb) 開啟了 URL downloaded 57 Kb package ‘neuralnet’ successfully unpacked and MD5 sums checked The downloaded binary packages are in C:\Users\ccc\AppData\Local\Temp\Rtmp0sE1PU\downloaded_packages > library("neuralnet") Loading required package: grid Loading required package: MASS > traininginput <- as.data.frame(runif(50, min=0, max=100)) > trainingoutput <- sqrt(traininginput) > trainingdata <- cbind(traininginput,trainingoutput) > colnames(trainingdata) <- c("Input","Output") > net.sqrt <- neuralnet(Output~Input,trainingdata, hidden=10, threshold=0.01) > print(net.sqrt) Call: neuralnet(formula = Output ~ Input, data = trainingdata, hidden = 10, threshold = 0.01) 1 repetition was calculated. Error Reached Threshold Steps 1 0.0001101775792 0.008844721887 4735 > plot(net.sqrt) > testdata <- as.data.frame((1:10)^2) > net.results <- compute(net.sqrt, testdata) > ls(net.results) [1] "net.result" "neurons" > print(net.results$net.result) [,1] [1,] 1.001467881 [2,] 1.999387727 [3,] 3.001562476 [4,] 3.999058142 [5,] 5.000677091 [6,] 6.000564137 [7,] 6.999302601 [8,] 7.998807718 [9,] 9.003759600 [10,] 9.981962425 > cleanoutput <- cbind(testdata,sqrt(testdata), + as.data.frame(net.results$net.result)) > colnames(cleanoutput) <- c("Input","Expected Output","Neural Net Output") > print(cleanoutput) Input Expected Output Neural Net Output 1 1 1 1.001467881 2 4 2 1.999387727 3 9 3 3.001562476 4 16 4 3.999058142 5 25 5 5.000677091 6 36 6 6.000564137 7 49 7 6.999302601 8 64 8 7.998807718 9 81 9 9.003759600 10 100 10 9.981962425 > 參考文獻 neuralnet: Training of neural networks http://cran.r-project.org/web/packages/neuralnet/index.html Neural Networks with R – A Simple Example http://gekkoquant.com/2012/05/26/neural-networks-with-r-simple-example/ http://cran.r-project.org/web/views/MachineLearning.html Neural Networks : Single-hidden-layer neural network are implemented in package nnet (shipped with base R). Package RSNNS offers an interface to the Stuttgart Neural Network Simulator (SNNS). neuralnet: Training of Neural Networks, by Frauke Günther and Stefan Fritsch http://journal.r-project.org/archive/2010-1/RJournal_2010-1_Guenther+Fritsch.pdf 評論 Post preview: Close preview or Sign in as Wikidot user (will not be published) - + Help: wiki text quick reference 授權 本網頁的作者、授權與引用方式 作者 陳鍾誠 (部分網頁改寫來源為：徐俊晓 「统计学与R读书笔记第五版」)，於金門大學資訊工程系，電子郵件：wt.ude.uqn|ccc#wt.ude.uqn|ccc，網站：http://ccckmit.wikidot.com。 授權 本文採用 GFDL 授權條款 (GNU Free Documentation License)。 引用方式 陳鍾誠, 「免費電子書：R 統計軟體」， (網站) 陳鍾誠的網站 (網頁標題) 神經網路，取自 http://ccckmit.wikidot.com/r:nerual ，網頁修改第 7 版 (24 Jun 2012 10:31)