用Matlab编写m文件，实现奥运五环图像（允许用户输入环的直径）程序怎么写？

R = str2num(input('请输入半径长度:','s'));
%圆心坐标
Bxy = [-sqrt(3)*R 0];
Kxy = [0 0];
Rxy = [sqrt(3)*R 0];
Yxy = [-sqrt(3)/2*R -3/2*R];
Gxy = [sqrt(3)/2*R -3/2*R];
%绘制五环
rectangle('Position',[Bxy(1)-R,Bxy(2)-R,2*R,2*R],'Curvature',[1,1],'EdgeColor',[0 0 1])
rectangle('Position',[Kxy(1)-R,Kxy(2)-R,2*R,2*R],'Curvature',[1,1],'EdgeColor',[0 0 0])
rectangle('Position',[Rxy(1)-R,Rxy(2)-R,2*R,2*R],'Curvature',[1,1],'EdgeColor',[1 0 0])
rectangle('Position',[Yxy(1)-R,Yxy(2)-R,2*R,2*R],'Curvature',[1,1],'EdgeColor',[1 1 0])
rectangle('Position',[Gxy(1)-R,Gxy(2)-R,2*R,2*R],'Curvature',[1,1],'EdgeColor',[0 1 0])