Re: make matrix animate
- To: mathgroup at smc.vnet.net
- Subject: [mg24917] Re: [mg24896] make matrix animate
- From: Andrzej Kozlowski <andrzej at tuins.ac.jp>
- Date: Sun, 20 Aug 2000 01:35:07 -0400 (EDT)
- Sender: owner-wri-mathgroup at wolfram.com
Yes. Here is a simple example. Let's define a function f by:
In[8]:=
f[i_][i_, i_] := 1
In[9]:=
f[i_][j_, k_] := 0
This will produce three graphics of elementary matrices:
In[10]:=
Do[Show[Graphics[Text[Array[f[i], {3, 3}] // MatrixForm, {0, 0}]]], {i, 1,
3}]
Now select them and choose Animate Selected Graphics from the Cell menu.
Andrzej
--
Andrzej Kozlowski
Toyama International University, JAPAN
For Mathematica related links and resources try:
<http://www.sstreams.com/Mathematica/>
on 8/19/00 10:46 AM, Borut L. at JustMyName at email.si wrote:
> Helo,
>
> I made a function that has many matrices as output. It's in fact puzzle 15
> board, where in sequent matrices zero (blank space) moves
> left/right/up/down. Is there a way to make a graphical animation (like
> Do[Plot[...) with my output?
>
> Thanks a lot, Borut
>
>
>
>