WebMail Inecol Página principal INECOL Consejo Nacional de Ciencia y Tecnología

 Tecnologías de Información y Comunicaciones

Simbolización de Expresiones Algebraicas

Como señalábamos en la anterior sección es posible escribir operaciones algebraicas con una sintaxis muy semejante a la que estamos acostumbrados:

<Variable> ^ <Exponente>

Veamos este ejemplo:

Mathematica 3.0 for Linux
Copyright 1988-97 Wolfram Research, Inc.
-- Motif graphics initialized --

In[1]:= x^3
Out[1]= x3
In[2l:= 2*y^7
Out[2]= 2y7
In[3]:= 3w^2
Out[3]= 3w2
In[4]:= -2x^2
Out[4]= -2x2
In [5]:= x^3+x^2-x-1
Out[5]= - 1 - x + x2 + x3

Como se puede apreciar es posible escribir cualquier letra que funcione como variable. Además, el reconocimiento de la expresión por parte de Mathematica se logra al reescribirla pero ahora la expresión comienza con el término de menor exponente hasta el de mayor exponente.

Asignacion de Valores Numéricos a Variables

Podemos sustituir cualquier variable por un valor numérico o por una expresión algebraica y de esta forma, lograríamos manejar más fácilmente expresiones largas tal como se hace en la vida real.

<Variable>=<Valor numérico>
<Variable> = <expresión>
Asignación.
<Variable>=. Elimina cualquier valor de la variable.

Veamos un ejemplo:

Mathematica 3.0 for Linux
Copyright 1988-97 Wolfram Research, Inc.
-- Motif graphics initialized --

In[1]:= q = 5
Out[1]= 5
In[2l:= w = 32
Out[2]= 32
In[3]:= q * w
Out[3]= 160
In[4]:= % - q
Out[4]= 155
In [5]:= w
Out[5]= 32
In [6]:= w=.
In [7]:= q=.
In [8]:= q * w
Out[8]= qw

Podemos distinguir con claridad la forma de asignar valores a variables y el manejo de esas variables (como en la entrada 3), así como la posterior remoción de los valores de dichas variables.

Evaluación de Una Expresión con Respecto a un Valor Numérico

Es posible evaluar una expresión dada con respecto a un valor numérico en la cual se sustituye la variable por el valor definido. Esto se logra de la siguiente forma:

<Expresión> /. <Variable> -><Valor numérico>

Como hemos visto, se utilizó un nuevo filtro (" /. ") para poder separar a la expresión de la evaluación y se introdujo un nuevo elemento, (" -> "), que funciona como apuntador y nos será muy necesario para cálculos posteriores.

Observemos este ejemplo:

Mathematica 3.0 for Linux
Copyright 1988-97 Wolfram Research, Inc.
-- Motif graphics initialized --

In[1]:= x^3+x^2-x-1
Out[1]= - 1 - x + x2 + x3
In[2l:= % /. x -> 3
Out[2]= 32
In[3]:= 15x^4+94x^3-5x^2-164x+60 /. x -> 15
Out[3]= 1073100


NOTA: Esta notación se utiliza para sustituir la variable por un valor numérico y se puede confundir con la que se emplea en Cálculo para obtener límites.


Operaciones Fundamentales

El tratamiento de operaciones algebraicas (suma,resta,multiplicación, división) es similar a la nomenclatura real; únicamente se tendrá que poner énfasis en el uso de paréntesis para que Mathematica pueda distinguir las expresiones así como la operación que se desee.

Observemos el siguiente ejemplo:

Mathematica 3.0 for Linux
Copyright 1988-97 Wolfram Research, Inc.
-- Motif graphics initialized --

In[1]:= (x^3+3x^2-8x-1)+(-x^3+2x^2-3x+5)
Out[1]= 4 - 11x + 5x2
In[2l:= (x+Sqrt[2])(x-Sqrt[2])(x+4)
Out[2]= (4 + x)(-Sqrt[2] + x)(Sqrt[2] + x)
In[3]:= %1 / (x -3)
Out[3]=

Nótese que en la segunda y tercera salida Mathematica no devuelve el resultado esperado sino que realiza el proceso de reconocimiento por lo que será necesario indicar al programa lo que queremos mediante comandos.

Manejo de Comandos Básicos

El tratamiento de las expresiones es una de las aplicaciones más poderosas del Mathematica, ya que es capaz de factorizar, expander, ejecutar productos notables, simplificar, ordenar bajo requerimientos concretos y particulares como agrupaciones por denominador común,por grado de potencias, por letras, etc. dando todo esto un tópico sumamente interesante a Mathematica.

Un acercamiento al uso de los comandos mencionados en la sección anterior se propone a continuación (se utilizará la abreviatura "expr" para referirnos a la expresión):

Expand [<Expr> ] Efectúa los productos y cocientes ofreciendo el resultado en una sola expresión.
Factor [<Expr> ] Factoriza la expresión a su mas mínima expresión.
Simplify [<Expr> ] Descompone la expresión en fracciones simples.
ExpandAll [<Expr>] Expande todos los elementos posibles que se puedan obtener dado una operación.
Together [<Expr>] Acomoda todos los términos en un común denominador.
Apart [<Expr>] Separa todos los términos con denominador simple.
Cancel [<Expr>] Elimina los factores comunes en el denominador y numerador.
Collect [<Expr>] Reúne todas las potencias de la variable x.
FactorTerms [<Expr> , <Variable>] Pone como factor todo aquello que no depende de la variable nombrada en "variable", en una expresión algebraica.

Detengámonos en este ejemplo:

Mathematica 3.0 for Linux
Copyright 1988-97 Wolfram Research, Inc.
-- Motif graphics initialized --

In[1]:= e=(x-1)^2(x+2)/((x+1)(x-3)^2)
Out[1]=

In[2]:= Expand[e]
Out[2]=

In[3]:= ExpandAll[e]
Out[3]=

In[4]:= Together[%]
Out[4]=

In[5]:= Apart[e]
Out[5]=

In[6]:= Factor[e]
Out[6]=

Manejo de Comandos Avanzados

Expand [<Expr>, Trig->True ] Expande las funciones trigonométricas escribiéndola en su máxima expresión.
Factor [<Expr>, Trig->True ] Comando que realiza la operación inversa al anterior.
PowerExpand [<Expr> ] Distribuye el exponente en términos que operen con más de dos variables.
Coefficient [<Expr>, <Variable> ] Señala los coeficientes de la variable en cuestión.
Exponent [<Expr>, <Variable> ] Obtiene la potencia mayor de la variable contenida en una expresión.

Es posible que en varias ocasiones escribamos un término erróneamente en una expresión. El siguiente comando reemplaza dicho término:

ReplacePart [<Expr>,<Término>, n ]

Veamos en seguida un ejemplo de lo expuesto:

Mathematica 3.0 for Linux
Copyright 1988-97 Wolfram Research, Inc.
-- Motif graphics initialized --

In[1]:= (x+Sqrt[5])(x-Sqrt[5])(x+4)
Out[1]=

In[2]:= Expand[%]
Out[2]= - 20 - 5x + 4x2 + x3

In[3]:= Factor[%]
Out[3]= (4 + x) (- 5 + x2)

In[4]:= ExpandAll[%]
Out[4]= - 20 + 5x + 4x2 + x3

In[5]:= Part[%,2]
Out[5]= -5x

In[6]:= ReplacePart[%4,8x,2]
Out[6]= -20 + 8x + 4x2 + x3

In[7]:= Exponent[%6,x]
Out[7]= 3

In[8]:= Coefficient[%2,x]
Out[8]= -5

In[9]:= p=((x^3+8)(x^3-8))/((x^2-4)(x^2+2x+4))
Out[9]=

In[10]:= ExpandAll[%]
Out[10]=