
% Einlesen der Problemdaten
Daten_Transportproblem;

% Darstellung des Graphen
h = Graph(A);
XY = [0.90 0.44;0.59 0.07;0.90 0.12;0.60 0.61;0.42 0.39;0.88 0.82;0.47 0.92;0.11 0.48;0.25 0.07];
h.setNodePositions(XY);

% Setzen der Optionen fuer das Optimierungsverfahren
options = optimset('Algorithm','simplex','Diagnostics','on','Display','iter');

% Aufruf des Optimierungsverfahrens
[xstar,fstar,exitflag,output,lambda] = linprog(c,[],[],A,b,l,u,[],options);

% Darstellung der Loesung
edgeLabels = arrayfun(@(x,y) ['[ ' num2str(x) ' / ' num2str(y) ' ]'], xstar, u,  'UniformOutput', false);
nodeLabels = arrayfun(@(x,y) [num2str(x) ': ' num2str(y)], (1:m)', b,  'UniformOutput', false);
h = Graph(A,h,nodeLabels,edgeLabels);
h.setNodePositions(XY);


