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

 Tecnologías de Información y Comunicaciones

Definición de Matríz

La forma de definir matrices dentro de Mathematica® es muy simple:

{{a,b },{c,d}}Genera un arreglo matricial.

Podemos en cualquier momento definir un elemento de una matriz.

<Matriz> [[<Renglón> ,<Columna> ]] Define el elemento posicionado en renglón, columna de la matriz indicada.

De la misma forma podemos definir un renglón de la matriz.

<Matriz>> [[<Renglón> ]] Define el renglón de la matriz indicada.

En matemáticas se acostumbra a colocar los elementos entre corchetes grandes. Mathematica® simula este despliegue con la siguiente instrucción:

MatrixForm[<Matriz> ]

Observemos el siguiente ejemplo:

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

In[1]:= A = {{4,0,6}, {1,6,2}, {3,9,0}}
Out[1]= {{4,0,6}, {1,6,2}, {3,9,0}}
In[2l:= A[3,2]
Out[2]= 9
In[3]:= MatrixForm[A]
Out[3]= //MatrixForm =

Matríz Identidad

La matriz identidad es el elemento neutro en la multiplicación de matrices, es decir, que una matriz multiplicada por ésta nos dará la misma matriz;comúnmente, suele simbolizarse a esta matriz con la letra "I".

El comando para obtener dicha matriz se presenta a continuación:

IdentityMatrix[<Dimensión> ]

donde "dimensión" es la dimensión de la matriz tanto de renglones como columnas. Veamos enseguida un ejemplo:

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

In[1]:= IdentityMatrix[3]
Out[1]= {{1,0,0}, {0,1,0}, {0,0,1}}
In[2]:= MatrixForm[%]
Out[2]= //MatrixForm =

Matríz Diagonal

Una matriz diagonal es aquella que tiene la forma interna de una diagonal, es decir, los valores diferentes de 0 se encuentran en la diagonal principal de la matriz.

Su forma de obtención es mediante el siguiente comando:

DiagonalMatrix[<Valores> ]

donde los valores son los componentes de la diagonal principal. Veamos un ejemplo de lo expuesto:

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

In[1]:= DiagonalMatrix[{3, -4, 2}]
Out[1]= {{3,0,0}, {0,-4,0}, {0,0,2}}
In[2]:= MatrixForm[%]
Out[2]= //MatrixForm =

Matríz Transpuesta

La matriz transpuesta se obtiene al intercambiar los elementos por medio de su posción dentro de la matriz. Así, el elemento cuya posición es [2,1] será [1,2], la [3,2] será la [2,3], etc.

Para obtener la matriz transpuesta de una matriz utilizando Mathematica® se recurre al siguiente comando:

Transpose[<Matriz> ]

Observemos este ejemplo:

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

In[1]:= A={{5, 3, 6}, {2, 0, 7}, {8, 1, 0}}
Out[1]= {{5,3,6}, {2,0,7}, {8,1,0}}
In[2]:= MatrixForm[%]
Out[2]= //MatrixForm =
In[3]:= Transpose[A]
Out[3]= {{5, 2, 8}, {3, 0, 1}, {6, 7, 0}}
In[4]:= MatrixForm[%]
Out[4]= //MatrixForm =

Y si anidamos los comandos:

In[5]:= MatrixForm[Transpose[A]]
Out[5]= //MatrixForm =

es decir que en la entrada 5 se construye un comando compuesto basado en el comando "MatrixForm" cuyo argumento es el comando "Transpose" y este a su vez, tiene como argumento la matriz A.

Matríz Inversa

Se dice que una matriz inversa es aquella que al multiplicarse por la matriz original nos da como resultado la matriz identidad. Por lo tanto, si la matriz A es invertible entonces la matriz A multiplicada por su inversa es igual a I.

-1 A x A = I

NOTA: Una matriz es invertible siempre y cuando sea cuadrada, es decir, que sus dimensiones sean iguales.


Para obtener dicha matriz se emplea el siguiente comando:

Inverse[<Matriz> ]

Analicemos este ejemplo:

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

In[1]:= W={{-4, 9}, {1, -2}}
Out[1]= {{-4, 9}, {1, -2}}
In[2]:= MatrixForm[%]
Out[2]= //MatrixForm =
In[3]:= Inverse[W]
Out[3]= {{2, 9}, {1, 4}}
In[4]:= MatrixForm[%]
Out[4]= //MatrixForm =

Podemos observar la claridad del uso de este comando en la entrada 3. La demostración de la definición de la matriz inversa se las dejo como ejercicio práctico pues es necesaria la multiplicación de matrices que se estudiará en la siguiente sección.

Operaciones entre Matrices

Las operaciones que se pueden realizar entre matrices son las mismas que se utilizan en la aritmética elemental.

+ Adición matricial.
- Sustraciión matricial.
* Multiplicación matricial (no conmutable).
/ División matricial.

Cabe indicar que la multiplicación entre matrices cumple con las siguientes características:

  • Sus elementos no se pueden conmutar.
  • El número de columnas de la primera matriz debe ser igual al número de renglones de la segunda matriz.

Observemos este ejemplo:

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

In[1]:= A={{-2, 1, 3},{4, 0, -1}}
Out[1]={{-2, 1, 3},{4, 0, -1}}
In[2]:= B={{4, 1, -2},{5, -1, 3}}
Out[2]= {{4, 1, -2},{5, -1, 3}}
In[3]:= MatrixForm[A]
Out[3]= //MatrixForm =
In[4]:= MatrixForm[B]
Out[4]= //MatrixForm =
In[5]:= MatrixForm[A+B]
Out[5]= //MatrixForm =
In[6]:= MatrixForm[A-B]
Out[6]= //MatrixForm =
In[7]:= MatrixForm[A*B]
Out[7]= //MatrixForm =
In[8]:= MatrixForm[A/B]
Out[8]= //MatrixForm =

Se puede apreciar que el argumento del comando MatrixForm es la operación, hecho que nos es de mucha utilidad.

Potencia de una Matríz

Una operación muy común es elevar una matriz a la"n" potencia. Existe una fórmula para resolver dicho cálculo pero en Mathematica® utilizaremos el comando siguiente:

MatrixPower[<Matriz>,<Potencia>]

Enfoquémonos en el siguiente ejemplo:

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

In[1]:= MatrixForm[Q={{4, 3, 2}, {-4, 5, -2}, {-1, 3, 5}}]
Out[1]= //MatrixForm =
In[2]:= MatrixPower[%, 4]
Out[2]= {{-1370, 621, -696}, {282, -1829, -1080}, {-1317, -45, -719}}
In[3]:= MatrixForm[%]
Out[3]= //MatrixForm =

Es notorio la inmensa utilidad que nos da el hecho de pasar como argumento la asignación de una matriz al comando MatrixForm como se puede apreciar en la entrada 1.

Obtencion de Determinantes

La determinante de una matriz es un valor asociado a la matriz misma y se define de manera inductiva. Este valor nos sirve para varias aplicaciones en álgebra lineal, entre ellas, el conocimiento del número de soluciones que una matriz (sistema de ecuaciones) pueda tener.

La forma de obtener la determinante es por medio de la siguiente instrucción:

Det[<Matriz> ]

Veamos este ejemplo:

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

In[1]:= MatrixForm[A={{2, -5, 3}, {1, 3, 4}, {-2, 3, 7}}]
Out[1]= //MatrixForm =
In[2]:= Det[A]
Out[2]= 120

Eigenvalores y Eigenvectores

Los eigenvalores de una matriz son aquellos valores que al evaluarse en cualquiera de sus renglones nos da como resultado un elemento de la matriz aumentada igual a 0.

La obtención de los mencionados valores se logra gracias a este comando:

Eigenvalues[<Matriz> ]

De la misma forma, los eigenvectores se resuelven con la siguiente instrucción:

Eigenvectors[<Matriz> ]

Veamos este ejemplo:

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

In[1]:= Eigenvalues[{{a, b}, {-b, 2a}}]
Out[1]=
In[2]:= m={{2.3, 4,5},{6.7, -1.2}}
Out[2]= {{2.3, 4,5},{6.7, -1.2}}
In[3]:= Eigenvalues[m]
Out[3]= {6.31303, -5.21303}
In[4]:= Eigenvectors[m]
Out[4]= {{0.746335, 0.66557},{-0.523116, 0.873374}}
In[5]:= f={{0, 1, 0},{0, 0, 1},{0, 0, 0}}
Out[5]= {{0, 1, 0},{0, 0, 1},{0, 0, 0}}
In[6]:= MatrixForm[f]
Out[6]=
In[7]:= Eigenvalues[f]
Out[7]= {0, 0, 0}
In[8]:= Eigenvectors[f]
Out[8]= {{1, 0, 0},{0, 0, 0},{0, 0, 0}}

Trigonometría

Conversion de Unidades de Medicion Angular

Un ángulo es la abertura que forman dos rectas al intersecarse.

Es posible que deseemos convertir un ángulo medido en grados a radianes. Esto se logra en Mathematica® con la instrucción siguiente:

<Grados> Degree

En realidad lo que se está realizando matemáticamente es obtener la razón de proporción entre la constante Pi y la mitad del valor angular de un círculo. Veamos:


                       Pi
        Un grado = ------------  Radianes
                    180 grados
   

Observemos este caso de conversión:

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

In[1]:= 30 Degree
Out[1]= 30 Degree
In[2]:= N[30 Degree]
Out[2]= 0.523599

Como vemos, es necesario teclear el filtro de exactitud "N" para obtener el valor en cuestión.

Inversamente podemos convertir radianes a grados de la siguiente forma:

<Radianes> (1/Degree)

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

In[1]:= N[2Pi (1/Degree)]
Out[1]= 360
In[2]:= N[Pi/4 (1/Degree)]
Out[2]= 45

Funciones Trigonométricas

Las funciones trigonométricas son relaciones que involucran a los catetos y a la hipotenusa de un triángulo. Existen seis funciones cada una con su respectiva escritura en Mathematica®:

Sin Función seno.
Cos Función coseno.
Tan Función tangente.
Cot Función cotangente.
Sec Función secante.
Csc Función cosecante

De igual forma, las funciones trigonométricas inversas se definen fácilmente.

ArcSin Función arcoseno.
ArcSCos Función arcocoseno.
ArcTan Función arcotangente.
ArcCot Función arcocotangente.
ArcSec Función arcosecante.
ArcCsc Función arcocosecante.

Recuérdese que los argumentos se escriben entre corchetes seguidos de los comandos, en este caso, las funciones. Veamos este ejemplo de como Mathematica® reconoce expresiones trigonométricas:

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

In[1]:= Sin[x]^2
Out[1]= Sin[x]2
In[2]:= N[Sin[60],5]
Out[2]= 0.86602

Una confusión podría surgir en la entrada 1. Se podría pensar que es el argumento el que se eleva al cuadrado, sin embargo, es la función la que se eleva a la potencia mencionada. Si se desea lo primero la escritura sería así:

In[1]:= Sin[x^2]

Funciones Hiperbolicas

Las funciones hiperbólicas son las siguientes:

Sinh Función seno hiperbólico.
Cosh Función coseno hiperbólico.
Tanh Función tangente hiperbólica.
Coth Función cotangente hiperbólica.
Sech Función secante hiperbólica.
Csch Función cosecante hiperbólica.

Comandos Trigonométricos

Así como las funciones relacionan elementos (catetos e hipotenusa), las identidades relacionan funciones manteniendo cierta interacción con los componentes de un triángulo. Es decir, es posible escribir una función en términos de cualquier otra función.

El comando que se emplea es el siguiente:

TrigReduce[<Expresión> ]

Una lista de comandos útiles al tema se presenta a continuación:

Expand[<Expr>,Trig->True] Escribe las potencias de los argumentos como coeficientes de los mismos.

Factor[<Expr>,Trig->True] Factoriza las expresiones trigonométricas.

TrigToComplex[<Expr> ] Escribe una expresión trigonométrica en términos complejos utilizando las identidades de Euler.

ComplexExpand[<Expr> ] Escribe expresiones complejas en términos trigonométricos.

TrigFactor[<Expr> ] Descompone la expresión en factores.