Páginas

Bienvenidos

Este blog busca darle algunas herramientas para trabajar con varios de los programas más interesantes y útiles de la actualidad.

El objetivo es emplear ejemplos y su desarrollo paso a paso para que el aprendizaje sea lo más fácil y real posible.

Mathematica

Mathematica
Mathematica

Etiquetas

Datos personales

Mi foto
Ingeniero
Esp. Informática y Computación
Esp. Administración de Sistemas

apache Flex

Mathematica

Todo el poder de Mathematica en la Web:



Ejemplos de uso:

1) Plot3D[Sin[x]*Cos[y],{x,0,2 Pi},{y,0,Pi}]
2) Colombia

Escribe el ejemplo y da clic en el igual

Seguidores

miércoles, 29 de junio de 2011

PostHeaderIcon PROLOG: Elementos consecutivos en una lista


Este programa mira si dos elementos se encuentran consecutivos en una lista:


my_consecutive(X,Y,[X,Y|_]).

my_consecutive(X,Y,[_|Xs]):-
my_consecutive(X,Y,Xs).


Para ejecutar el programa:


?- my_consecutive(e,g,[d,f,e,g,h,e,r,u]).


Y el resultado es:


yes


Para ejecutar el programa:


?- my_consecutive(g, e, [d,f,e,g,h,e,r,u]).


Y el resultado es:


no



*** Programa probado en WinProlog versión 4.7 ***

domingo, 19 de junio de 2011

PostHeaderIcon PROLOG: Borra elemento N de una lista (versión 2)


Este programa elimina el elemento en la posición N en una lista:

my_remove_element_n(_, _, [], []).

my_remove_element_n(N, N, [_|Xs], Zs):-
          I2 is N + 1,
          my_remove_element_n(N, I2, Xs, Zs), !.

my_remove_element_n(N, I, [Y|Xs], [Y|Zs]):-
          I2 is I + 1,
          my_remove_element_n(N, I2, Xs, Zs).


Para ejecutar el programa:

?- my_remove_element_n(5, 1, [a,b,c,d,e,f,g,h], Zs).


Y el resultado es:

Zs = [a,b,c,d,f,g,h]




*** Programa probado en WinProlog versión 4.7 ***

PostHeaderIcon PROLOG: Borra elemento N de una lista


Este programa elimina el elemento en la posición N en una lista:


my_remove_element_n(1, [_|Xs], Xs).

my_remove_element_n(I, [X|Xs], [X|Ys]):-
I2 is I - 1,
my_remove_element_n(I2, Xs, Ys).


Para ejecutar el programa:


?- my_remove_element_n(5, [a,b,c,d,e,f,g,h], Zs).


Y el resultado es:


Zs = [a,b,c,d,f,g,h]



*** Programa probado en WinProlog versión 4.7 ***

viernes, 10 de junio de 2011

PostHeaderIcon PROLOG: Compresión de una lista (versión 2)


Este programa permite eliminar los elementos repetidos en una lista. A diferencia de la versión 1 de este programa, los elementos a eliminar NO tienen que estar contiguos:


my_compress([], []):- !.

my_compress([X|Xs], Ys):-
my_member(X, Xs),
!,
my_compress(Xs, Ys).

my_compress([X|Xs], [X|Ys]):-
my_compress(Xs, Ys).


Para ejecutar el programa:


?- my_compress([a,a,e,e,e,c,c,b,b,b,b,d,f], Ls).


Y el resultado es:


Ls = [a,e,c,b,d,f]


Para ejecutar el programa:


?- my_compress([e,e,e,a,a,e,e,e,c,c,b,b,b,b,d,f], Ls).


Y el resultado es:


Ls = [a,e,c,b,d,f]


Nota: Este programa usa algunas reglas (programas) definidas anteriormente.


*** Programa probado en WinProlog versión 4.7 ***

miércoles, 8 de junio de 2011

PostHeaderIcon PROLOG: Compresion de una lista


Este programa permite eliminar los elementos repetidos en una lista. Los elementos a eliminar deben estar contiguos:

my_compress([], []).

my_compress([X], [X]).

my_compress([X, X|Xs], Zs):-
          my_compress([X|Xs], Zs).

my_compress([X, Y|Ys], [X|Zs]):-
          X \= Y,
          my_compress([Y|Ys], Zs).


Para ejecutar el programa:

?- my_compress([a,a,e,e,e,c,c,b,b,b,b,d,f], Ls).


Y el resultado es:

Ls = [a,e,c,b,d,f]


Para ejecutar el programa:

?- my_compress([e,e,e,a,a,e,e,e,c,c,b,b,b,b,d,f], Ls).


Y el resultado es:

Ls = [e,a,e,c,b,d,f]




*** Programa probado en WinProlog versión 4.7 ***

Apache Flex

Wolfram Programming Lab