Maple15 - macierze

Mathematica, Matlab, Statistica, LaTeX i wszelkiego rodzaju oprogramowanie przydatne matematykowi w pracy. Miejsca w sieci poświęcone zagadnieniu.
pilu
Użytkownik
Użytkownik
Posty: 31
Rejestracja: 10 wrz 2009, o 19:47
Płeć: Mężczyzna
Lokalizacja: Podkarpacie
Podziękował: 4 razy

Maple15 - macierze

Post autor: pilu »

Moje zadanie:
Zadanie 1. Porównaj efektywnoœæ dwóch metod rozwi¹zywania uk³adów równañ liniowych dla uk³adów ró¿nej wielkoœci (ró¿nej liczby równañ).
Mo¿esz naœladowaæ powy¿szy eksperyment wykorzystuj¹c obie metody w jednej pêtli na losowo wybranych macierzy i wektorze. Wyniki zapisz w dwóch wektorach np. T1 i T2.

Mój kod:

Kod: Zaznacz cały

> T1 := Vector(); 
T2 := Vector();
 for i from 20 by 20 to 100 do 
b := RandomVector(i); 
A1 := RandomMatrix(i); 
s := time(); GaussJordan(A1, b); 
T1 := <T1, time()-s>:
 G := RandomVector(i); 
CH := Cholesky(A1);
 CH1 := SubMatrix(CH, 1 .. i, 1 .. i); 
CH2 := SubMatrix(CH, 1 .. i, 1+i .. 2*i); 
G := RozwiazTrojkatny(CH2, G); 
WYNIK := RozwiazTrojkatny(CH2, G); 
s := time(); #inicjalizuje stoper
T2 := <T2,i> : #zapisuje rozmiar macierzy w wektorze T2

end do;
> print(T2, T1);

Niestety w wektorze T1 wyświetlają się same zera i nie potrafię tego naprawić
ODPOWIEDZ