MATLAB仿真

Question

我必须模拟蚂蚁在他们家（黑盒子）和食物（黄盒子）之间移动。这些三色盒子是蚂蚁。我写的用于绘制图的代码如下：

 % background
 background()   

 % making ants 
 handle = zeros(10,3) 
 handle = makingAnts(10) ;

 % moving ants 
 movingAnts(hand)

功能背景：

 function background()

figure
hold on 
axis equal
axis([0 100 0 100])
pos = rand(1,2).*75
rectangle('position',[0 0 10 10],'facecolor','k')
rectangle('position',[pos 25 25],'facecolor','y')
 end

制作蚂蚁的功能：

  function [h] = makingAnts(n)
  h = zeros(10,3)
  dia = [2 2]
   for i = 1:n
  pos = rand(1,2).* 95 ; 
  h(i,1) = rectangle('position',[pos dia],'facecolor',[0.2 0.6 1])
  g1 = get(h(i,1),'position')
  h(i,2) = rectangle('position',[(g1(1)+2) (g1(2)+2) 2 2],'facecolor',[0.4 1 0.6])   
  h(i,3) = rectangle('position',[(g1(1)+4) (g1(2)+4) 2 2],'facecolor',[1 0.8 1])
  end
   end

现在我必须移动蚂蚁。虽然我已经编写了代码，但它无法正常工作。我需要帮助让蚂蚁移动。

我写的代码：

 function  movingAnts(h)
 % moving 1 ant 
 pos = get(h(1),'position') 
 m = pos(1)
 n = pos(2) 
  for i = 1:50 
 set(h(1),'position',[(m+0.2) (n+0.2) 2 2])
 pause(0.05) 
 end
   end

Answer 1

figure
axis([0 100 0 100])
rectangle('position',[0 0 5 5],'facecolor','k')
rectangle('position',[95 95 100 100],'facecolor','y')
n = 5;
x = zeros(1,n);
y = zeros(1,n);
c = ones(1,n);
while 1
  for i = 1 : n
      h1(i) = rectangle('position',[x(i) y(i) 2 2],'facecolor',[0.2 0.6 1]);
      g1 = get(h1(i),'position');
      h2(i) = rectangle('position',[(g1(1)+2) (g1(2)+2) 2 2],'facecolor',[0.4 1 0.6]);
      h3(i) = rectangle('position',[(g1(1)+4) (g1(2)+4) 2 2],'facecolor',[1 0.8 1]);
      x(i) = x(i) + c(i) * randi(4,1);
      y(i) = y(i) + c(i) * randi(4,1);
      if x(i) > 100 || y(i) > 100
          c(i) = -1 * c(i);
          x(i) = 100; y(i) = 100;
      end
      if y(i) < 0 || x(i) < 0
          c(i) = -1 * c(i);
          x(i) = 0; y(i) = 0;
      end
  end
  pause(.1)
  delete(h1,h2,h3);
end

Answer 2

正如@ franz1指出的那样，问题是m和n变量在循环之外，因此不会更新。 为了扩展他/她的答案，这里有一个movingAnts.m函数：

function  movingAnts(h)
    h = reshape(h,numel(h),[]);
    for i = 1:50
        pos = get(h,'position');
        % move all ants
        pos = cellfun(@(x) x+[1,1,0,0], pos, 'UniformOutput', false);
        set(h,{'position'},pos);        
        drawnow update %display updates
        pause(0.1);
    end
end

此外，您应该将h中makingAnts.m的定义更改为：

h = zeros(n,3);

Answer 3

for i = 1:50 
    set(h(1),'position',[(m+0.2) (n+0.2) 2 2])
    pause(0.05) 
end

由于m, n是常量，所以在这里你将蚂蚁放在每次迭代中的相同位置。