Labfans是一个针对大学生、工程师和科研工作者的技术社区。 | 论坛首页 | 联系我们(Contact Us) |
![]() |
|
![]() |
#1 |
初级会员
注册日期: 2009-05-02
帖子: 1
声望力: 0 ![]() |
![]()
我写的这段小程序,用quiver命令画位移场。怎么老是出现位移矢量的颜色是五颜六色,有没有什么办法改成单一的颜色?另外,怎么将箭头的尺寸变大,使其更明显看到?
谢谢大家了!!!(见附图) 代码如下 for i=1:161 for j=1:161 U=[I(:,1),I(:,2)]; V=[I(:,4),I(:,5)]; dis(i,j)=norm(U(i, ![]() ![]() [m n]=find(dis<=40); end end t=length(m); for k=1:t if V(m(k),1)<=550 xx(k,1)=V(n(k),1)-U(m(k),1); yy(k,1)=V(n(k),2)-U(m(k),2); else xx(k,1)=V(n(k),1)-U(m(k),1); yy(k,1)=V(n(k),2)-U(m(k),2)+11; end end for k=1:t dis2(k,1)=norm(U(m(k), ![]() ![]() end for k=1:t quiver(V(n(k),1),V(n(k),2),xx(k,1)*2,yy(k,1)*2,1,'-','filled') %set(ht,'autoscalefactor',2); hold on end axis([0 1100 0 1100]) |
![]() |
![]() |