9 lines
200 B
Mathematica
9 lines
200 B
Mathematica
|
type = 'max';
|
||
|
A = [4 3; 4 1; 4 2; 1 0; 0 1];
|
||
|
sign = [-1 ; -1 ; -1 ; 1 ; 1 ];
|
||
|
h = [12 ; 8 ; 8 ; 0 ; 0 ];
|
||
|
c = [3 4];
|
||
|
|
||
|
|
||
|
[z,x_B,index_B] = simplex (type,A,h,c,sign);
|
||
|
histogram([index_B x_B']')
|