|
Revision 1249, 0.6 kB
(checked in by zimamiro, 15 years ago)
|
|
|
| Line | |
|---|
| 1 | function [ztrata1 ztrata2]=srovnej(system,apriori,seed) |
|---|
| 2 | kresli=0; |
|---|
| 3 | [ztrata1 omega1 rizeni1]=jednoduche_rizeni(system,apriori,seed); |
|---|
| 4 | [ztrata2 omega2 rizeni2]=dualni_rizeni(system,apriori,s); |
|---|
| 5 | if (kresli) |
|---|
| 6 | figure |
|---|
| 7 | plot(omega1(1,:),'r-'); hold on |
|---|
| 8 | plot(omega1(2,:),'r.-.'); |
|---|
| 9 | plot(omega2(1,:),'b-'); |
|---|
| 10 | plot(omega2(2,:),'b.-.'); |
|---|
| 11 | legend('SKUTECNE_simple','ODHAD_simle','SKUTECNE_dual','ODHAD_dual'); |
|---|
| 12 | TITLE([ztrata1';ztrata2']); |
|---|
| 13 | figure |
|---|
| 14 | plot(rizeni1(1,:),'r-'); hold on |
|---|
| 15 | plot(rizeni1(2,:),'r.-.'); |
|---|
| 16 | plot(rizeni2(1,:),'b-'); |
|---|
| 17 | plot(rizeni2(2,:),'b.-.'); |
|---|
| 18 | legend('simple_1','simple_1','dual_1','dual_1'); |
|---|
| 19 | end |
|---|
| 20 | end |
|---|