How to implement an artificial neural network in Delphi? [closed]

心不动则不痛 提交于 2019-12-02 21:25:51

First hit is: you're assigning '0' to t in 'main', but your arrays' low-bound is '1', so you're accessing a non-existing element in the loops, hence the AV.

If you had enabled range-checking in compiler options, you'd be getting a range check error and you probably would have find the reason earlier.

BTW, since I have no idea what the code is doing, I wouldn't possibly notice any other errors at this time..

If you're interested in using a third party library (free for non-commercial products, I've been very happy with some tools from this company http://www.mitov.com/html/intelligencelab.html (although I've never used their intelligence lab, just video tools.)

Fast Artificial Neural Network (FANN) is a good open source library, its been optimised and used by a large community, with plenty of support and delphi bindings.

Using dependencies in this area is advised if you don't fully understand what your doing, the smallest detail can have a big impact on how a neural network performs; so best spend your time on your implementation of the network, then on anything else.

Other links that may be helpful for you:

http://delphimagic.blogspot.com.ar/2012/12/red-neuronal-backpropagation.html (Includes source code) Coding a Backpropagation neural network with two input neurons, two output and one hidden layer. The sample provides two sets of data that can train the network and see how accurate learning minimizing the error shown in a graph. Modifying the program can change the number of times the network trained with test data (epochs)

易学教程内所有资源均来自网络或用户发布的内容,如有违反法律规定的内容欢迎反馈
该文章没有解决你所遇到的问题?点击提问,说说你的问题,让更多的人一起探讨吧!