Demostraciones Erróneas
¿ 2=1 ?

Una demostración matemática es una sucesión coherente de pasos que, tomando como verdadero un conjunto de premisas, permite asegurar la veracidad de una tesis. Sin embargo muchas veces al utilizar estas demostraciones nos encontramos con errores sutiles y contradicciones que nos impiden llegar a un resultado correcto.

Veamos si puedes encontrar el error en esta demostración.


1. Sea a igual a b y diferente de cero.
a = b

2. Multiplica por a
a² = ab

3. Resta
a² - b² = ab - b²

4. Factoriza ambos lados
(a – b) (a + b) = b (a –b)

5. Divide entre (a – b)
a + b = b

6. Como a es igual a b
b + b = b

7. Combinando los términos iguales
2b = b

8. Divide entre b
2 = 1

El error se encuentra en la línea 5: el paso de la línea 4 a la 5 implica una división por a-b, que es cero ya que a equivale a b (por la suposición). Como la división por cero no está definida, la demostración no es válida.

Para más información visita: http://es.wikipedia.org/wiki/Demostraci%C3%B3n_inv%C3%A1lida

Geo-Mathematica

Si creiste haber experimentado todas las bondades que Mathematica te puede ofrecer, pues aquí te presento una que quizá nunca pensaste encontrar. Así es, explorando el sitio web de Mathematica puedes hallar herramientas tan útiles como tu propio mapa-mundi interactivo, el cual podemos manipular ampliamente gracias a nuestro software.

Varias visualizaciones de nuestro planeta y selectivamente de cada uno de sus países son posibles gracias a este magnífico aporte, el cual sencillamente "desdobla" la superficie aproximadamente esférica de nuestro planeta de acuerdo a modelos estándar centrados en un punto manipulable por el usuario.

Código

Manipulate[
 Show[CountryData[
  cy, {"Shape", {p, 
  If[p === "LambertConic", {(5 (90 + c[[1]]))/6 - 90, c[[2]]}, 
  c]}}], ImageSize -> {500, 350}], {{p, "Robinson", 
  "projection"}, {"Albers", 
  "Bonne", {"CylindricalEqualArea", 0}, {"CylindricalEquidistant", 
  0}, "EckertIV", "EckertVI", "Equirectangular", "LambertAzimuthal",
  "LambertConic", "LambertCylindrical", "Mercator", 
  "MillerCylindrical", "Mollweide", "Orthographic", "Polyconic", 
  "Robinson", "Sinusoidal", "VanDerGrinten", "WinkelTripel"}},
 {{c, {0, 0}, "center"}, {-90, -90}, {90, 90}, 
  ImageSize -> Small}, {{cy, "World", "country"}, 
  Join[{"World", Delimiter}, CountryData[]]}, 
 Initialization :> CountryData[All, "Preload"], 
 SynchronousInitialization -> False]

El código emplea contenido preestablecido que Mathematica obtendrá automáticamente de la red.

Espero resulte de utilidad para nuestros lectores.

Diego V.

Mathematica es diversión!!!

Es ya conocido por todos sus usuarios que Mathematica es un software muy versátil; versátil hasta el punto de ser al mismo tiempo una poderosa herramienta de cálculo y convertirse en un software de entretenimiento, cuyas características nos permiten recrear varios modelos matemáticos y, en consecuencia, cualquier objeto regido por dichos modelos.

En esta oportunidad, crearemos la simulación de un juego muy popular, un cubo Rubik, mismo que podremos armar y desarmar a voluntad gracias a nuestro software de Wolfram® y sus maravillosas características.

Código en: http://demonstrations.wolfram.com/ColorCube3x3x3Puzzle/

Esto es todo lo que necesitas para empezar a disfrutar de tu propio cubo Rubik virtual.

¿Quién dijo que Mathematica no es divertido?
Diego V.

NUMB3RS


La serie televisión de CBS “NUMB3S” se destaca por tener el soporte técnico de Wolfram Research, un equipo de entusiastas científicos que está detrás de cada capítulo para poder deleitarnos con teoría y aplicaciones reales sobre el fascinante mundo de las matemáticas


Este equipo está formado por colaboradores y desarrolladores del software Mathematica

• Amy Young (Innovator in Mathematica Training for Educators)
• Michael Trott (Co-Creator of the Wolfram Functions Site)
• Eric Weisstein (Creator of Wolfram Mathworld)
• Ed Pegg Jr. (Creator MathPuzzle.com)

Para mayor información http://numb3rs.wolfram.com

Estrellas y Planetas...Una reflexión

Comparando tamaños


¡Demostremos nuestro amor!


Mathematica es hoy en día un software que nos permite realizar cálculos y lo novedoso es que ahora podemos hacer simulaciones. Para ejemplo realizaremos un corazón con una característica curiosa, primeramente utlizemos un polinomio en dos variables para poder generar nuestra región de corazón f(x,y)= (x^2+y^2-1)3 -x^2y^3

Código

{izq,der}=Map[Function[{side},RegionPlot[(x^2+y^2-1)^3-x^2 y^3<0&&side*x<side
(Abs[Abs[Abs[Abs[Abs[.5 y]-1]-.5]-.25]-.125]-.125),{x,-1.5,1.5},{y,-1.5,1.5},ColorFunction->"CherryTones"]],{1,-1}];

Manipulate[Show[izq,der/.GraphicsComplex[points_List,other__]:>GraphicsComplex[RotationTransform[-rotation
°,{0,-1}][points],other],AspectRatio->Automatic,Frame->False,PlotRangePadding->{{.5,1.25},{1,.5}}],{{rotation,10,"corazón
roto"},0,90},SaveDefinitions->True]

Ciencias Básicas les desea un feliz 14 de Febrero en compañía de sus familiares y parejas

Mathematica en la industria



Steve Bush juega un rol muy importante en la elaboración de artículos de consumo doméstico en The Procter & Gamble Company, ya que ha participado en la física detrás de los productos, así como su viabilidad económica.

En Mathematica ha encontrado una herramienta muy eficaz para resolver complejos cálculos numéricos,

"Numéricamente, es lo suficientemente potente como para crear no sólo la geometría, sino también para mostrar cómo el producto va a funcionar en la vida real donde las cosas no son necesariamente perfectas. Ser capaz de convertir la teoría en matemáticas en prototipos de trabajo es realmente un gran valor para nosotros