Einzelnen Beitrag anzeigen

Benutzerbild von jokerfacehro
jokerfacehro

Registriert seit: 13. Feb 2007
306 Beiträge
 
Delphi 7 Enterprise
 
#1

Neuronales Netz - FeedForward

  Alt 23. Sep 2011, 14:22
Hallo,

ich habe auf Grundlage dieses Tuts: http://www.codeproject.com/KB/recipes/brainnet.aspx

ein kleines neuronales Netz erstellt.
Ich möchte daraus eine Texterkennung für 1Bit-Bilder erstmal machen (also Schwarz-Weiß-Bilder)
und euch den Quelltext zur Verfügung stellen um selber daran weiter zu basteln.

Das Netz ist ein FeedForward Netz mit BackPropagation und hat 3 Schichten.
Bisher ist nur 1HiddenLayer vorgesehen. -> 1Input, 1Hidden, 1Output


Zur Zeit habe ich ein Netz mit 3-3-1 Neuronen.
Dann gibts dazu nen Input- und Output-array und das Output-array kann man dan beliebig ändern
(im quelltext), sodass man innerhalb der 8Bit beliebig trainieren kann.


Zuerst muss das Netz trainiert werden.
Bei jedem Click auf Train werden 4000 Durchläufe gemacht.

Der Log im Memo ist abgeschaltet, da es die Laufzeit start verlängert.


Das Progamm ist in Lazarus-Delphi geschrieben, sollte aber ohne Änderungen auch unter Borland Delphi laufen.



Keywords: neuronales netz, neuronale netze, neuronale netzwerke
Angehängte Dateien
Dateityp: zip NN_source.zip (128,2 KB, 76x aufgerufen)
Dateityp: zip NN_exe.zip (636,8 KB, 69x aufgerufen)
"Never touch a running system administrator !"

Geändert von jokerfacehro (23. Sep 2011 um 14:39 Uhr) Grund: Anhang
  Mit Zitat antworten Zitat