netgraph_draw_simple.m

来自「％The Metabolic Networks Toolbox contains」· M 代码 · 共 26 行

% netgraph_draw_simple(network)

function netgraph_draw_simple(network,regulation)

if ~exist('regulation','var'), regulation = 0; end

[i,j]=find(triu(network.graphics_par.m));

plot(network.graphics_par.x(1,:),network.graphics_par.x(2,:),'r.'); hold on;
line( [network.graphics_par.x(1,i); network.graphics_par.x(1,j)],...
      [network.graphics_par.x(2,i); network.graphics_par.x(2,j)],'color',[0 0 1]);

if regulation,
    x = network.graphics_par.x;
  [i,j]=find(triu(network.graphics_par.m_regulation)); 
  if isfield(network.graphics_par,'linecolor'), linecolor = 0.5+0.5*network.graphics_par.linecolor;
  else                       linecolor = [0. 1 0.];
  end
  line([x(1,i); x(1,j)],[x(2,i); x(2,j)],'color',linecolor);
end

hold off;

axis([-0.1 1.1 -0.1 1.1]);
axis square