Výpočet vzhledem k různým bazím

Zvolíme vhodně pivoty a dostaneme bazické proměnné takto:

> A:=Pivot(Ab,1,1);

A := _rtable[4903164]

> A1:=Pivot(A,2,2);

A1 := _rtable[5040088]

Volbou x[3] = 0 , x[4] = 0 najdeme vrchol (průsečík přímek odpovídajících 1. a 2. rovnici)

> X[1]:=A1[1,6]/A1[1,1];X[2]:=A1[2,6]/A1[2,2]; X[5]:=A1[3,6]/A1[3,5];

X[1] := 3125/8

X[2] := 15625/16

X[5] := -78125/4

Odtud vidíme, že vrchol [X[1], X[2]] není přípustný , protože doplňková proměnná je záporná.

> A2:=Pivot(A1,3,3);

A2 := _rtable[17877508]

Volbou x[4] = 0 , x[5] = 0 najdeme vrchol (průsečík přímek odpovídajících 2. a 3. rovnici)

> X[1]:=A2[1,6]/A2[1,1];X[2]:=A2[2,6]/A2[2,2];X[3]:=A2[3,6]/A2[3,3];

X[1] := 0

X[2] := 0

X[3] := 500000

Odtud vidíme, že vrchol [X[1], X[2]] = [0, 0] je přípustný , protože doplňková proměnná je kladná. Je samozřejmě možné nenakoupit nic, tedy 0 akcií, pak doplňková proměnná x[3] odpovídá množství peněz, které zbudou.

> A3:=Pivot(A2,3,4);

A3 := _rtable[19724664]

Volbou x[3] = 0 , x[5] = 0 najdeme vrchol (průsečík přímek odpovídajících 1. a 3. rovnici)

> X[1]:=A3[1,6]/A3[1,1]=evalf(A3[1,6]/A3[1,1]);X[2]:=A3[2,6]/A3[2,2]=evalf(A3[2,6]/A3[2,2]);X[4]:=A3[3,6]/A3[3,4]=evalf(A3[3,6]/A3[3,4]);

X[1] := 700000/647 = 1081.916538

X[2] := 500000/647 = 772.7975270

X[4] := 2500000/647 = 3863.987635

Odtud vidíme, že vrchol [X[1], X[2]] je přípustný , protože doplňková proměnná je kladná. Je tedy možné nakoupit 1081 akcií 1. druhu a 772 akcií 2. druhu.