- 在线时间
- 15 小时
- 最后登录
- 2012-11-19
- 注册时间
- 2012-7-25
- 听众数
- 5
- 收听数
- 0
- 能力
- 0 分
- 体力
- 140 点
- 威望
- 0 点
- 阅读权限
- 20
- 积分
- 51
- 相册
- 0
- 日志
- 0
- 记录
- 0
- 帖子
- 21
- 主题
- 2
- 精华
- 0
- 分享
- 0
- 好友
- 9
升级   48.42% TA的每日心情 | 郁闷 2012-9-8 16:59 |
|---|
签到天数: 8 天 [LV.3]偶尔看看II
- 自我介绍
- 活泼可爱
 群组: 数学建模培训课堂1 群组: 华南理工大学 群组: Linux推广 群组: 计算机考研 |
%画图; B! |) x% i4 R: c
/ k8 q* T1 f: y: A
close; ??????8 s! O7 g' L% a
set(gcf,'numbertitle','off'); ??????; J5 Y5 m1 B8 b% p1 L
set(gcf,'name','Dijkstra');
4 g1 X7 ~$ o& f6 j- \! f: Q1 S set(gca,'visible','off');
8 j- V" _- o) y I! d axis square;% g! U' s) O3 y1 B7 G
hold on;
9 F; o: S% O7 @2 V1 U# } 1 U% C# R2 F2 X0 Y: @+ a
b=linspace(0,2*pi,mx+1);
' @9 y- b: {: w b1=10*sin(b);8 |4 |$ n& }; z" Z, n
b2=10*cos(b);
( d( ~+ f; `3 @$ r plot(b1,b2,'ko');
P+ p7 Q( a/ Z+ T' U7 n hh=char(49:48+mx);
$ e9 {/ ^0 a& O% N, { for i=1:mx
I6 G9 `$ [4 U8 }2 v5 } text(b1(i)+0.5,b2(i),hh(i));
& b0 f" v* U2 J# V2 |% X end;' I* [# {- L$ p/ |
for j=1:m
1 m7 \. c/ C% p8 ^- L5 r for i=1:2 E! L% J: |4 l" n) r* a h* u
c1(i)=b1(map(j,i));
# y6 y. z2 q$ s c2(i)=b2(map(j,i));
, r* O0 n0 k$ F# A end;
& t2 \" S: ?4 a& l9 g1 A plot(c1,c2,':');
( @0 O% @5 J; M# F( ^3 j5 s end;
' u# N# s; x# p3 Q- z8 ^, y
; H4 U% F4 r: B" X: E kk=length(p);+ O/ ~( o+ z, d+ K7 U! n/ `" I. J& Z
k=0;
( Y; A2 f; j& P# _8 d, t for i=1:kk0 s- U; O* P! K0 y
if(p(1,i)~=0); }6 A( }$ s8 z- M0 O
k=k+1;9 l h& |0 L2 b8 H% _& D* C( U
end;
. i: [+ c: ~) V" k' ? end;
/ l1 m. l9 H9 g4 z, W for i=1:k
2 b3 h4 A$ w5 i' @( ? d1(i)=b1(p(1,i));
1 m' g3 @( Y$ R! W7 k% z% c d2(i)=b2(p(1,i));4 R0 s: f2 d* ?; ~, C3 L
h=plot(d1,d2,'r');
6 r+ X2 f4 {- K; f6 F8 Vend; . G' t6 s1 T b1 ]2 `% l
set(h,'linewidth',2);
3 w* V; k/ J) ?# e7 h legend(h,'粗线表示最短路');
$ J9 J" ]4 a8 L3 C hold off
9 O& v8 z; v8 D这是程序的画图部分,里面的p,v,map,f分别是经过狄杰斯卡尔算法算出的最短路径,最短路径所经过的点集,输入的矩阵
9 v t1 D% \+ o) F6 `) ] `# Gmap形如[1,2,30;2,3,34;3,4,12] |
zan
|