Algoritmo genético con 6 genes
Visual Basic
Publicado el 25 de Septiembre del 2016 por Rafael Angel (81 códigos)
5.832 visualizaciones desde el 25 de Septiembre del 2016
Algoritmo geneticon con 6 genes, es la vercion mejorada del algoritmo gentico con 4 genes.
Este proyecto es experimental a modo de demostracion que los algoritmos geneticos si funcionan.
'Autor Rafael Angel Montero Fernández. (Angel Continium ADNX)
'Fecha viernes 16 de septiembre del 2016.
'Despues de muchos intentos este es el primer algoritmo genético funcional al 100% que he diseñado basandome en la experiencia y conocimientos del tema y las practicas.
'El algoritmo si encuentra la solucion pero ahora la tarea que debo realizar es una función que lance la solucion encontrada la cual si llegará a nacer.
'Si sigo desarrollando y perfeccionando este algoritmo entonces, me permitirá crear una serie de programas muy interactivos y con la capacidad de aprender en forma interactiva similar a la de un bebe.
'Este algoritmo es totalmente funcional, se puede partir de aqui para crear nuevas variantes del algoritmo usando como estructura o base este mismo.
'Por ejemplo en la cimulacion de un vehiculo autonomo que trancita por un camino sin chocar contra otros objetos o bordes, aprendizaje interactivo con el usuario...
'Juegos de estrategia en la cual las unidades controladas por la computadora no realicen ataques suicidas sino que su comportamiento sea similar al de un ser humano.
'Busquedas no lineales de información sino, que en paralelo, por ejemplo divicion cilavica.
'Controles utilizados en este proyecto:
'9 controles Label, 9 controles ListBox, 2 controles TextBox, 3 controles CommandButton, 9 controles ProgressBar.
'Nombres para los controles Label: lbMejoresHabitantes,lbDesempeño, lbMutacion, lbReemplazo, lbFenotipoDecodificado, lbAdd, lbGenoma, lbFenotipoElegido, lbPoblacion.
'Nombres para los controles ListBox: lstGenoma, lstFenotipoElegido, lstMejores, lstRendimiento, lstMutacion, lstReemplazo, lstPoblacion.
'Nombres para los controles TextBox: txtAdd, txtFenotipo.
'Nombres para los controles CommandButton: cmdAdd, cmdEvolucionar, cmdEnd.
'Nombre para los controles ProgressBar: prgGenoma, prgFenotipoElegido, prgPoblacion, prgMejores, prgRendimiento, prgMutacion, prgReemplazo, prgIteracionesDo, prgGeneraciones.
Este proyecto es experimental a modo de demostracion que los algoritmos geneticos si funcionan.
'Autor Rafael Angel Montero Fernández. (Angel Continium ADNX)
'Fecha viernes 16 de septiembre del 2016.
'Despues de muchos intentos este es el primer algoritmo genético funcional al 100% que he diseñado basandome en la experiencia y conocimientos del tema y las practicas.
'El algoritmo si encuentra la solucion pero ahora la tarea que debo realizar es una función que lance la solucion encontrada la cual si llegará a nacer.
'Si sigo desarrollando y perfeccionando este algoritmo entonces, me permitirá crear una serie de programas muy interactivos y con la capacidad de aprender en forma interactiva similar a la de un bebe.
'Este algoritmo es totalmente funcional, se puede partir de aqui para crear nuevas variantes del algoritmo usando como estructura o base este mismo.
'Por ejemplo en la cimulacion de un vehiculo autonomo que trancita por un camino sin chocar contra otros objetos o bordes, aprendizaje interactivo con el usuario...
'Juegos de estrategia en la cual las unidades controladas por la computadora no realicen ataques suicidas sino que su comportamiento sea similar al de un ser humano.
'Busquedas no lineales de información sino, que en paralelo, por ejemplo divicion cilavica.
'Controles utilizados en este proyecto:
'9 controles Label, 9 controles ListBox, 2 controles TextBox, 3 controles CommandButton, 9 controles ProgressBar.
'Nombres para los controles Label: lbMejoresHabitantes,lbDesempeño, lbMutacion, lbReemplazo, lbFenotipoDecodificado, lbAdd, lbGenoma, lbFenotipoElegido, lbPoblacion.
'Nombres para los controles ListBox: lstGenoma, lstFenotipoElegido, lstMejores, lstRendimiento, lstMutacion, lstReemplazo, lstPoblacion.
'Nombres para los controles TextBox: txtAdd, txtFenotipo.
'Nombres para los controles CommandButton: cmdAdd, cmdEvolucionar, cmdEnd.
'Nombre para los controles ProgressBar: prgGenoma, prgFenotipoElegido, prgPoblacion, prgMejores, prgRendimiento, prgMutacion, prgReemplazo, prgIteracionesDo, prgGeneraciones.
En esta vercion se trasladó todo el codigo y controles a un control ActiveX para hacerlo mas portable y poderse instanciar en varios Forms.
Se insertaron controles ProgressBar para mostrar gráficamente el desarrollo de la evolución.
Se agregaron dos variantes más para la recombinacion.
Finalmente aquí les dejo el proyecto en persona para que lo modifiques, optimices, mejores o hagas lo que más te guste con el.
Nota: Si llegas a perfeccionarlo o mejorarlo recuerda avisarme o mandarme una vercion mejorada...