matlab学习中,要求一个r,两点之间距离小于r时为相邻,且平均度为12.图是在[0,1]^2内的随机点

来源：学生作业帮编辑：作业帮分类：综合作业时间：2024/05/18 04:00:18

matlab学习中,要求一个r,两点之间距离小于r时为相邻,且平均度为12.图是在[0,1]^2内的随机点
以下是编程
function suiji
rand('seed',64);%以学号为种子产生随机数
A=rand(200,2);
x=A(:,1);
y=A(:,2);
subplot(1,2,1);
plot(x,y,'r.');
for r=0.01:0.01:1
N=200;
P=x+i*y; %随机布置N个顶点位于平面内
B=repmat(P,1,N)-repmat(P.',N,1); %计算顶点间的复向量
D=abs(B);
[Is,Js]=find(D=12) %通信半径为r时,平均度大于12
disp(r);
break
end
end
subplot(1,2,2);plot([P(Is) P(Js)].','o-'); % 打印这些连线
for k=1:200
text(x,y,num2str(k));%num2str() 函数转换数字到字符串,%给图形标点
end
1.if (ceil(m/200)>=12) 语句中的>换成=时图形打印错误
2.给图形里的每个点编号怎么编呀,总是出错
3.还要用Dijkstra算法计算出网络中最靠近中心的顶点到其它所有顶点之间的最短路,求指导……

试试这个修改之后的
clear all;
clc
%
v=point;% 中心顶点v
A=Value;% 拓扑图路径权值对应矩阵A
n=length(A);%顶点个数
V=1:n;%顶点集合
s=v;%已经找到最短路的点集,初始为v
l=A(v,:);%当前v点到各个点的距离,初始为直接距离
Front=v.*ones(1,n);%当前距离时点的父顶点,初始都为v
ss=setdiff(V,s);nn=length(ss);%还没有找到最短路的点集
for j=1:n-1%一共进行n-1次迭代
k=ss(1);
for i=1:nn%对还没有找到最短路的点
if l(k)>l(ss(i))
k=ss(i);
l(k)=l(ss(i));%在当前一行距离中取最小值
end
end
if l(k)==inf%如果当前行最小值是无穷大,则结束
break;
else%否则k点的最短路找到
s=union(s,k); %把找到的最近点放入最小路径集合中
ss=setdiff(V,s);
nn=length(ss);
end
if length(s)==n%全部点的最短路都找到
break;
else
for i=1:nn%以k为生长点,如果通过k点会更短,则更改当前最短距离
if l(ss(i))>l(k)+A(k,ss(i))
l(ss(i))=l(k)+A(k,ss(i));
Front(ss(i))=k;
end
end
end
end
figure(2) %绘制Dijkstra算法最短路径图
plot(x,y,'r.');
hold on;
for i=1:200
plot([P(i),P(Front(i)).'], 'o-');
hold on;
end

matlab学习中,要求一个r,两点之间距离小于r时为相邻,且平均度为12.图是在[0,1]^2内的随机点地球的半径为R,地面上两点都在北纬45°圈上,且两点的球面距离是πR/2,则两点的经度差地球的半径为R,地面上两点都在北纬45°圈上,且两点的球面距离是πR/2,则两点的经度差? 求阴影部分面积四个半径均为r的圆如图放置,相邻两圆交点之间的距离也等于r,不相邻两圆圆周上两点间的最短距离等于2,则r等四个半径均为r的圆如图放置，相邻两圆交点之间的距离也等于r，不相邻两圆圆周上两点间的最短距离等于2，则r等于 ___ ，四个半径均为r的圆如图放置，相邻两圆交点之间的距离也等于r，不相邻两圆圆周上两点间的最短距离等于2，则r等于6 四个半径均为r的圆如图放置，相邻两圆交点之间的距离也等于r，不相邻两圆圆周上两点间的最短距离等于2，则r等于______ 如图,在数轴上标出的点中,任何相邻两点之间的距离相等,则A,B,C三点分别表示的有理数为电路与电势如图,电路中,电源的电动势为E,内阻为r,电路中的C点接地,若在AC之间再并接一个电阻R',则AB两点电势的变如图,电路中,电源的电动势为E,内阻为r,电路中的C点接地,若在AC之间再并接一个电阻R',则AB两点电势的如图所示，在直线l上有若干个点A1、A2、…、An，每相邻两点之间的距离都为1，点P是线段A1An上的一个动点． y=2sin(wx+pai/3)的图像与直线y=0的公共点中,相邻两点之间的距离为pai/2 则