jueves, 21 de febrero de 2008

Drawing Tool de Mathematica mostrada por Roxana

Hola integrantes de MaTECmática ( http://www.matecmatica.blogspot.com/ ).

El día de hoy jueves a la una y media la MaTECmática Roxana nos enseñó cómo utilizar la Drawing Tool de Mathematica. Básicamente, en un documento de Mathematica tu puedes oprimir [Control]-[D], y aparece un menú que permite dibujar al estilo de “Paint”, pero directamente en Mathematica. La gran ventaja es que estos dibujos estilo “Paint” están totalmente embebidos en Mathematica, y pueden ser editados, combinados y procesados de la misma manera que cualquier otra gráfica de Mathematica, por ejemplo alguna que haya sido producida con un Plot[] o con un ParametricPlot[]. Como Roxana nos mostró, es realmente fácil de usar. Sólo opriman [Control]-[D] cuando tengan abierto un documento de Mathematica, y ya pueden empezar a dibujar, ya sea directamente sobre una gráfica que fue producida por un Plot[] para añadirle cosas como flechas o etiquetas, ya sea con un dibujo totalmente en blanco.

Esto puede ser útil para modificar las gráficas que nos dé Mathematica y prepararlas para papers, tareas, ilustraciones, etcétera.

Para ver un ejemplo de lo que se puede hacer con esta herramientita, vean el Manipulate sobre el efecto Doppler que crearon Roxana y Rafael para Principia el semestre pasado, con el cual obtuvieron el tercer lugar:
http://homepage.cem.itesm.mx/lgomez/ingenia/menu.html

¡Un abrazo MaTECmáticos!
José Luis

Escuela avanzada de Mathematica en el verano en Wolfram Research

Hola integrantes de MaTECmática ( http://www.matecmatica.blogspot.com/ ).

La compañía creadora de Mathematica, Wolfram Research, acaba de abrir la convocatoria para su “Escuela Avanzada de Verano” de Mathematica, dos semanas con los supergurús de Mathematica, con un costo de 2500 Dólares (Ese es el puro costo de la escuela, además está el viaje, el hospedaje y los alimentos).

Aunque el costo parece dejarlo fuera de nuestras posibilidades, aún así les pido que lean con detalle la convocatoria, quizás haya la posibilidad de apoyos económicos (becas) por parte de Wolfram, búsquenle, lean bien por favor todas las ligas de esta página:
http://www.wolfram.com/news/events/summerschool2008/index.html
y también de esta liga
http://www.wolfram.com/news/events/summerschool2008/program.html
si alguno de ustedes pertenece a alguna cátedra, o puede conseguir financiamiento, esta escuela de verano parece una excelente opción para avanzar en sus proyectos personales y de investigación en Mathematica, ya que ese es el objetivo de esta escuela avanzada, que cada participante avance en su propio proyecto, asesorado por los grandes gurús de Mathematica.

¡Un abrazo MaTECmáticos!
José Luis

viernes, 15 de febrero de 2008

maquina ENIGMA simulada en Mathematica

El estudiante Gianfranco, uno de los MaTECmáticos, está intentando simular la maquina ENIGMA en Mathematica

ENIGMA fue una máquina desarrollada por los Nazis en la Segunda Guerra Mundial para mandar mensajes codificados a sus tropas, de tal manera que aunque el enemigo (los Británicos) interceptara los mensajes, No pudiera entender nada de la información.

Pero los Británicos pudieron obtener una máquina ENIGMA, y según tengo entendido, descifrar los códigos de los Alemanes.

Ese proceso de descifrar fue, tengo entendido (por favor corrígeme Sergio si me equivoco) uno de los principales impulsores del desarrollo de las Ciencias de la Computación.

Pues Gianfranco encontró las instrucciones para realizar una maquina ENIGMA de papel, y basado en esas instrucciones, quiere montar una maquina ENIGMA virtual en Mathematica.

Ya están involucrados también Danton, Homero y Hector, en este momento se están peleando con el “pizarrón” y la computadora.

Si alguno de ustedes está interesado, pónganse en contacto fon Gianfranco, Danton, Hector y Homero, cuyos correos aparecen en la lista de receptores de este correo.

¡Saludos!

José Luis

Impresora tridimensional usada desde Mathematica

Hola MaTECmáticos

Quizás hayan oído de las impresoras tridimensionales. Son “impresoras” que, en lugar de imprimir en papel, “imprimen” (hacen) objetos tridimensionales, hechos de resina, o de algún otro material aglutinable.

Es tradicional mandar a “imprimir” objetos 3D a ese tipo de programas desde paquetes computacionales de CAD, CATIA, etc.

Pues también se puede fácilmente mandar a “imprimir” a las impresoras tridimensionales desde Mathematica.

Y resulta que nosotros tenemos en el Campus una impresora tridimensional.

Pues ya le encomendé a Ángel, uno de los miembros de MaTECmática, que nos averigüe la posibilidad de utilizar nuestra impresora 3D desde Mathematica

En el Wolfram blog se explica brevemente como se puede hacer. Aparentemente es muy sencillo, en cuanto tengas una gráfica 3D de Mathematica, puedes usar el comando Export[] para guardar en el formato que entiende la impresora tridimensional, le mandas ese archivo a la impresora, y listo, tienes el objeto.

Pueden leer sobre este tema en la siguiente entrada del Wolfram Blog:
http://blog.wolfram.com/2007/07/3d_printing_with_mathematica.html

Si hay más interesados en este tema, quizás sea una buena idea que se coordinen con Ángel para averiguar que necesitamos para poder usar la impresora, cuanto cuesta, etcétera.

¡Saludos!
José Luis

jueves, 14 de febrero de 2008

Programación Funcional en Mathematica

Hola chicos, he creado un tutorial básico para comenzar a entender la programación funcional en Mathematica. De la siguiente liga pueden descargar el documento como archivo de Mathematica:

http://homepage.cem.itesm.mx/lgomez/matecmatica/funcionalprog.nb

Si no tienen Mathematica en este momento, lo pueden ver en versión HTML (no se ve tan bonito como el archivo de Mathematica, pero es suficiente)

http://homepage.cem.itesm.mx/lgomez/matecmatica/fp/fp.html

¡Ojalá les sea útil!

José Luis

miércoles, 13 de febrero de 2008

Mathematica romántico

Hola integrantes de MaTECmática

¿Quién dijo que los ingenieros, los físicos y los matemáticos no somos románticos?

Y además podemos ser románticos en Mathematica

Vean la siguiente entrada del Wolfram Blog:

http://blog.wolfram.com/2008/02/demonstrating_valentines_day.html

¡Un abrazo!

José Luis

Programa de Hector para polinomios de Taylor

Hola MaTECmáticos,
Les comparto un trabajo de Hector, sobre polinomios de Taylor. Además de revisar el gran trabajo de Hector, por favor también revisen los comentarios que incluyo más abajo, seguramente encontrarán varias cosas interesantes (GRACIAS HECTOR):
http://homepage.cem.itesm.mx/jose.luis.gomez/MaTECmatica/taylorMod.nb
> Estos son mis comentarios:
>
> 1. Quizás ya conozcas en Mathematica la función Series[], que entre
> otras cosas también puede usarse para calcular polinomios de Taylor.
>
> 2. Los polinomios de Taylor son aproximaciones, por eso la función de
> Mathematica Series[] no da un polinomio directamente, sino otro tipo
> de objeto que usa el comando O[] (es la letra O mayúscula), que
> permite que todas las operaciones que se hacen con el polinomio tengan
> incluido el nivel de aproximación adecuado. Si se desea, el polinomio
> aproximado con O[] puede ser convertido en un polinomio "normal" de
> Mathematica mediante el comando Normal[], pero se pierde el uso
> adecuado del nivel de aproximación.
>
> 3. Tu función Taylor imprime el polinomio con Print, eso permite al
> usuario final ver el polinomio pero No le permite usarlo. Esto es lo
> que quiero
> decir: Si tu ejecutas sol=Integrate[x^2,x], no solo se integra, sino
> que el resultado se guarda en la variable sol, e inmediatamente
> después puedes usarla en otro comando, por ejemplo
> ReplaceAll[sol,x->10]. Por otro lado, en tu programa, si ejecutas
> pol=taylor[Cos[x], -5, 10], no se guarda absolutamente nada en la
> variable pol, con lo cual el resultado se puede ver, pero no se puede
> usar en forma "automática" por otro comando que venga después.
>
> 4. Un reto interesante es intentar la forma eficiente de programar en
> Mathematica: prohibido usar For, Do, While, etc. Trata de hacer lo
> mismo usando solamente Map, Apply, MapIndexed, MapThread, Table, Nest,
> etc. Es decir, trata de usar programación funcional y simbólica.
>
> ¡Saludos!
>
> José Luis
>

Jonathan y Rubén ganadores

Mis queridos MaTECmáticos, ayer jueves hicimos un concurso de Matemática, formando parejas (cada pareja formada por un estudiante de semestre avanzado y otro estudiante de primeros semestres), les ponía un reto, anotaba quienes habían logrado resolver el reto, y después se formaban nuevas parejas para responder el siguiente reto, y así continuamos, respondiendo retos y rehaciendo parejas. Los estudiantes avanzados no podían tocar el teclado, sólo podían darle indicaciones a su compañero. De esa manera, a cada estudiante de primer o segundo semestre le tocó trabajar un ratito con cada estudiante avanzado. Cada reto contestado correctamente por la pareja de estudiantes contó como un punto bueno a cada miembro de la pareja. Cada estudiante llevaba acumulados los puntos buenos que obtuvo en las diferentes parejas en las que trabajó. Al final di dos premios simbólicos (una plumas con el logo del Tec) al más chipocludo de los avanzados (Jonathan Pérez Hurtado) y al más chipocludo de los de primeros semestres (Rubén Medellin)

¡Felicidades!

José Luis

Rompecabezas y acertijos en Mathematica

Hola queridos integrantes de MaTECmática.

Se supone que hoy es el International Puzzle Day, lo que quiera que eso signifique.

En el blog de Wolfram Research, los creadores de Mathematica, muestran varios “puzzles” hechos en Mathematica:

Read the entire entry at:
http://blog.wolfram.com/2008/01/international_puzzle_day.html

De hecho, estos “puzzles” forman parte del Wolfram Demonstrations Project (nótese que “Demonstration” no debe traducirse como Demostración, es más adecuado traducirlo como exhibición), lo cual quiere decir que:

1. Pueden ver el código fuente en Mathematica que es usado para crear estos puzles
2. Aunque No tengan Mathematica, si pueden interactuar con estos puzles, pues sólo necesitan descargar gratis el Mathematica Player, que es gratis: http://www.wolfram.com/products/player/download.cgi

Como ya les había dicho a algunos de ustedes, yo tengo ganas de implementar un ajedrez en Mathematica.
¿Alguno de ustedes se anima?
JL

Ya se porque no me llegan correos de algunos de ustedes (Angel, Heidi, etc)

Ya sé porque no me llegan correos de algunos de ustedes (Angel, Heidi, etc),

Nuestro compañero Gianfranco me explicó que en INFINITUM hicieron un cambio para bloquear SPAM, que de hecho está afectando a las cuentas del Tec, de tal manera que pueden recibir correos pero no enviarlos (No se puede enviar por INFINITUM desde una cuenta .itesm.mx).

Les incluyo el correo:


Medidas de Telmex contra el spam para usuarios de Infinitum

La Vicerrectoría de Tecnologías de Información informa que el 22 de diciembre pasado la empresa Telmex amplió sus medidas de seguridad para ayudar a combatir el llamado "correo basura" o spam. La medida consistió en bloquear el puerto 25 (SMTP), que es utilizado comúnmente para el envío de correo electrónico. Esta medida afecta a aquellos usuarios del servicio Infinitum con IP Dinámica, con una modalidad menor a 4 Mb.
De acuerdo con lo anterior, el envío de correos electrónicos desde fuera de las instalaciones del Tecnológico de Monterrey utilizando las cuentas de @itesm.mx a través de los diversos sistemas de correo (Outlook, Outlook Express, Eudora, Netscape Mail, Thunderbird, Pegasus Mail, Pine, IncrediMail, etc.) no ha podido realizarse desde esa fecha: cuando los usuarios afectados tratan de hacerlo, el cliente de correo no puede localizar el servidor del Tecnológico de Monterrey, marca un error de conexión y deja el mensaje en espera. La medida tomada por Telmex, sin embargo, no afecta la recepción de correos.
Para resolver este problema, los usuarios afectados deberán solicitar a Telmex la desactivación de la protección del puerto 25, para lo cual deben llenar el formato que para ese efecto ha puesto la empresa a su disposición en: https://www.beneficios.telmex.com/puerto25Prod/iniciaPuerto25Internet.do

Análisis de Economía de países en Mathematica

En el “Wolfram Blog”, la gente de Wolfram Research, creadores de Mathematica, habla de cómo usar Mathematica para hacer un análisis rápido de una frase como la siguiente: “Las pérdidas del Banco Francés fueron de 7 Billones (cuidado, los billones gringos son miles de millones, mientras que los billones mexicanos son millones de millones), esa cantidad, 7 Billones, es más grande que la economía de varios países”, ¿Cuántos y cuáles son esos países cuya economía es menor que ese fraude? Eso se puede responder rápidamente con Mathematica versión 6 (No se necesita comprar Ningún paquete extra Ni nada por el estilo, directamente Mathematica 6 me puede dar la respuesta con unos cuantos comandos).
Aquí pueden leer ese documento del “Wolfram Blog”:

http://blog.wolfram.com/2008/01/losing_a_countrys_gdp_in_the_f.html

¡Saludos!

José Luis


Read the entire entry at:
http://blog.wolfram.com/2008/01/losing_a_countrys_gdp_in_the_f.html

To see other posts, visit the Wolfram Blog at:
http://blog.wolfram.com

Propuestas de logos

Propuestas de logos para MaTECmática:

http://homepage.cem.itesm.mx/jose.luis.gomez/MaTECmatica/01aproplogo.doc

http://homepage.cem.itesm.mx/jose.luis.gomez/MaTECmatica/02aproplogoENBLANCO.jpg

http://homepage.cem.itesm.mx/jose.luis.gomez/MaTECmatica/02aproplogoENNEGRO.jpg

http://homepage.cem.itesm.mx/jose.luis.gomez/MaTECmatica/03aproplogo.jpg

http://homepage.cem.itesm.mx/jose.luis.gomez/MaTECmatica/04aproplogo.jpg

http://homepage.cem.itesm.mx/jose.luis.gomez/MaTECmatica/05aproplogo.jpg

¿Cuál les gusta más?

¿Que esperan de MaTECmática?

Hola queridos integrantes de MaTECmática,

Como resultado de nuestra reunión del 24 de enero, tenemos las siguientes tareas (háganlas rápido, No le dediquen más de media hora en total a los tres puntos siguientes, para que me lo envíen hoy o mañana o a más tardar el sábado):

1. Que cada uno me envíe por correo, si quieren con copia a todos los demás, QUE ESPERAN DEL GRUPO DURANTE ESTE SEMESTRE, QUE ESPERAN OBTENER, QUE ESPERAN APORTAR.
2. Basándose en su respuesta a la pregunta anterior, proponer una Visión (idea romántica y a largo plazo) y una Misión (más concreta, explicando someramente “cómo” se va a lograr la visión) para el grupo. Pueden tomar como modelo las diferentes propuestas que ya nos hicieron dos de sus compañeros, y que les hago llegar anexas a este correo.
3. Proponer una organización interna del grupo MaTECmática que sirva para cumplir con su respuesta a la pregunta anterior: Encargado de tal cosa, encargado de tal otra, etc.

Insisto: Cuando mucho dedíquenle media hora a los tres puntos anteriores.
Además, por favor también:

1. Aquellos que ya tengan trabajo hecho en Mathematica (Instrucciones para dibujar en Mathematica, Computación Cuántica, Paquete de Control, Brazo robótico, Teoría de perturbaciones en Ecuaciones Diferenciales, etc. etc.) por favor indíquenme que jueves del semestre les gustaría exponer, el título de su plática y la duración estimada (mínimo quince minutos, máximo 50 minutos).

¡Un abrazo!
José Luis