只是要结果的话,没必要画圆,只要求出R与A,B之间对应关系即可。可以用迭代法或者代数法求解。迭代法就是从初始半径开始,不断累加0.5去尝试,并且不断交替变换A,B值,直到到达目标半径。代数法就是算出半径与输出之间的公式关系,然后将要求的R直接带入求解。(如果你非要画圆,那也只是画图技巧上的问题,和算法没关系)
代码及效果图如下:
clc
clear all
close all
%== 初始值 ==%
r0 = 1; % 最里面那个圆的半径
d = 0.5; % 半径增量
%===========%
R = 4; % 要求解的半径
%== 迭代法 ==%
K = 1; % 标志位,1-输出A=2,B=1;0-输出A=1,B=2
N = 1; % 从里往外数第N个圆
r = r0;
while(r<R)
N = N + 1;
K = ~K;
r = r0+(N-1)*d;
end
if(K==1)
A = 2;
B = 1;
else
A = 1;
B = 2;
end
fprintf('R=%f, A=%d, B=%d\n', R, A, B);
%===========%
%== 代数法 ==%
% 可以看出,第奇数个圆输出都为A=2,B=1;第偶数个圆输出都为A=1,B=2
N_cal = (R-r0)/d+1; % 求出是第几个圆
if(mod(N_cal,2)==0)
A_o = 1; B_o = 2;
else
A_o = 2; B_o = 1;
end
fprintf('R=%f, A_o=%d, B_o=%d\n', R, A_o, B_o);
%============%
%== 如果你想看不同R下输出变化 ==%
R = 1:0.5:5; % 查看R从1~20变化时输出
A_o_m = zeros(1, length(R));
B_o_m = zeros(1, length(R));
N_cal_m = (R-r0)./d+1; % 求出每个R分别对应第几个圆
for i=1:length(R)
if(mod(N_cal_m(i),2)==0)
A_o_m(i) = 1; B_o_m(i) = 2;
else
A_o_m(i) = 2; B_o_m(i) = 1;
end
end
figure
A_B = [A_o_m; B_o_m]';
h = stem(R,A_B);
set(h(1),'MarkerFaceColor','blue') % 蓝色-A
set(h(2),'MarkerFaceColor','red','Marker','square') % 红色-B
如果同样的模型,转换成直角坐标呢?
和什么坐标系没关系,关键是R与A,B之间的关系,这个关系不变结果都一样