Hi alle zusammen!

Da ich mich ja nun doch etwas intensiver mit neuronalen Netzen aller Art befasse, hier meine neuste Schöpfung.
Ähnlich wie ein anderes Programm von mir, welches mit einem neuronalen Netz die Ziffern 0 bis 9 erkennen kann, kann dieses Programm die Ziffern 0 bis 4 erkennen. Oder besser gesagt, rekonstruieren!

Eine kurze Übersicht:
Hopfield-Netz
Einschichtiges Feedback Netz, d.h. es gibt nur eine Schicht, die gleichzeitig Eingabe -und Ausgabeschicht ist.
Desweiteren ist das Netz rückgekoppelt, d.h. jedes Neuron ist mit jedem vernetzt außer mit sich selbst.
Die Gewichte sind symmetrisch, d.h. das Gewicht zwischen Neuron A und Neuron B ist gleich dem Gewicht zwischen Neuron B und Neuron A und umgekehrt.

Besonderheit
Hopfield-Netze lernen nicht wirklich, sie speichern eher die Eingabemuster. Es gibt nur einen Lerndurchgang, danach kennt das Netz alle Eingabevektoren/-muster. (Erwähnenswert hierbei: Natürlich kann das Netz nicht unendlich viele Muster speichern, sobald der Quotient Muster zu Neuronenzahl größer als 0,136 ist, ist es nicht mehr sicher, dass das Netz eine sichere Antwort findet. In diesem Fall ist der Quotient 5/81 -> 0,062 -> Möglich!)
Sie geben auch kein explizites Ergebniss, um welches Muster es sich handelt, sondern sie rekonstruieren das Eingabemuster.
Sollte man dem Netz also ein stark unkenntlich gemachtes Eingabemuster geben, so rekonstruiert es das. Jedoch kann die komplette Rekonstruktion mehrere Iterationen erforden. Es ist also sehr gut zum Vorschalten vor andere Netze!

Das Netz ist ohne Schnickschnack wie Energiefunktion, also perfekt für Einsteiger.
Alles was nötig war ist kommentiert, ist aber nicht viel!


Da ich TFlowPanel benutze, ist dieses Code-Beispiel leider nicht unter Delphi 7 abwärts nutzbar! Da es aber um den Code geht, spielt das keine große Rolle. Die Exe geht ja trotzdem.

Lg, Flips