Mostrar los tags: lg

Mostrando del 51 al 58 de 58 coincidencias
<<>>
Se ha buscado por el tag: lg
Imágen de perfil

Algoritmo de hormigas artificiales


Visual Basic

estrellaestrellaestrellaestrellaestrella(5)
Publicado el 2 de Marzo del 2017 por Rafael Angel (81 códigos)
4.385 visualizaciones desde el 2 de Marzo del 2017
'Autor: Rafael Angel Montero Fernández.
'Fecha: Martes 28 de febrero del 2017.
'Un experimento con lo que conosco de algoritmos de hormigas artificiales.
'Es muy basico lo que conosco y puedo aplicar del tema.
'En cuanto aprenda más acerca de estos algoritmos realizará otro proyecto experimental más avanzado.
'Esto es solo un ejercicio para ir visualizando que aspectos del algoritmo me faltan, que debo mejorar, como hacerlo mejor.

Con mayor conocimiento se puede usar para que las hormigas lleguen a un objetivo fijado por el usuario.
Algoritmos-de-hormigas-artificiales
Imágen de perfil

Analizador básico de textos


Visual Basic

estrellaestrellaestrellaestrellaestrella(2)
Publicado el 24 de Febrero del 2017 por Rafael Angel (81 códigos)
3.126 visualizaciones desde el 24 de Febrero del 2017
Este proyecto lo he creado como un analizador básico de textos.
Aunque espero agregarle mas habilidades conforme experimente con el y vea en que puedo hacerlo mejorar.

Queda en sus manos camaradas.

Descárgalo en el vínculo de descargas.


Analizador
Analizador-2
Imágen de perfil

Algoritmo genético con 6 genes


Visual Basic

estrellaestrellaestrellaestrellaestrella(7)
Publicado el 25 de Septiembre del 2016 por Rafael Angel (81 códigos)
6.363 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.

AG-img-5
Imágen de perfil

Macro Excel cuando no existe comdlg


Excel

estrellaestrellaestrellaestrellaestrella(1)
Actualizado el 28 de Julio del 2016 por Hugo Arturo (4 códigos) (Publicado el 15 de Julio del 2016)
2.178 visualizaciones desde el 15 de Julio del 2016
hola

en otras macros que he realizado necesito el comdlg para obtener la ruta de los archivos, txt, excel, o bases de access y así poder manipular la información

no quería meterme a macros de excel de 2003, 2007 y menos de 2010, pues en lugar de mejorar, "el proveedor" quita lo que no le gusta y pumm, tuve que hace una macro en excel 2010.

no tiene el comdlg, y buceando un poco en excel encontre esta alternativa

buscar el archivo Application.GetOpenFilename, de esta manera abre una versión de comdlg

1
2
3
4
cells(12, 6).Value = Application.GetOpenFilename( _
     "Excel Files(*.xls;*.xlsx;*.xlsm;*.xla;*.xlam),*.xls;*.xlsx;*.xlsm;*.xla;*.xlam", , _
     "Selecccione el archivo Accountentry Blotter a cargar:")
RutaArch1 = Cells(12, 6).Value

en la celda (12,6) pongo la ruta para que el proto usuario valide que es corecta la ruta
y ese valor lo muevo a una variable RutaArch1, ya que con esa ruta abro el excel correspondiente

una delas cosas buenas es que si necesitaba 4 o mas archivos para no hacerce bola se tenia que tener nas de un comdlg, con esta opcion con Application.GetOpenFilename lo manipulas, en mi caso a 8 archivos diferentes

ya con la ruta del archivo ese excel lo abro como una tabla de base de datos y dependiendo de la version de excel se abre diferente proveedor

1
2
3
4
5
6
7
8
9
10
11
12
13
If VBA.Val(Application.Version) < 12 Then
ExcelStr = "Provider=Microsoft.Jet.OLEDB.4.0;" & _
"Data Source = '" & RutaArch1 & "''';" & _
"Extended Properties=""Excel 8.0;HDR=No;IMEX=1"";"
ElseIf VBA.Val(Application.Version) < 14 Then
ExcelStr = "Provider=Microsoft.Jet.OLEDB.12.0;" & _
"Data Source = '" & RutaArch1 & "';" & _
"Extended Properties=""Excel 12.0;HDR=No;IMEX=1"";"
Else
ExcelStr = "Provider=Microsoft.ACE.OLEDB.12.0;;" & _
"Data Source = '" & RutaArch1 & "';" & _
"Extended Properties=""Excel 12.0;HDR=YES;\"";"
End If

lo demas es abrir un objeto excel y un recorset
sin imagen de perfil

Algoritmo simplificado de Boyer-Moore


Python

estrellaestrellaestrellaestrellaestrella(1)
Publicado el 23 de Julio del 2015 por Maximo (3 códigos)
5.293 visualizaciones desde el 23 de Julio del 2015
Una implementación del algoritmo de Boyer-Moore para búsqueda de cadenas de texto dentro de un archivo de texto.

El algoritmo de Boyer-Moore es el más rápido que se conoce para ésta tarea. En este caso utiliza sólo la regla del carácter malo, no utiliza la regla del sufijo bueno, y simplemente cuando es necesario utilizar esta regla desplaza la ventana de lectura en 1.

Recibe dos argumentos: El archivo dónde buscar y la cadena a buscar. Devuelve las posiciones dentro del archivo donde se encuentran instancias de dicha cadena.
sin imagen de perfil

Algoritmos de búqueda y ordenamiento


Python

estrellaestrellaestrellaestrellaestrella(3)
Actualizado el 23 de Julio del 2015 por Maximo (3 códigos) (Publicado el 11 de Agosto del 2006)
28.846 visualizaciones desde el 11 de Agosto del 2006
Colección de algoritmos de búsqueda y ordenamiento.
-Ordenamiento Shell/Shell Sort
-Ordenamiento Radix/Radix Sort
-Quick Sort
-Mezcla Directa/Merge Sort
-Inserción/Insertion Sort
-Burbuja Mejorado/Enhanced Bubble Sort
-Algoritmo de Cook-Kim/Cook-Kim Sort
-Ordenamiento burbuja/Bubble Sort
-Búsqueda Secuencial/Sequential Search
-Búsqueda Binaria/Binary Search
-Ordenación Binaria/Binary Sort
-Módulo para creación y operaciones sobre arreglos.
Anterior123456Siguiente