Circle rotating and whirling

Question

DARLINGTON ETAJE 2019-7-24

0
链接

此问题的直接链接

https://ww2.mathworks.cn/matlabcentral/answers/473180-circle-rotating-and-whirling

编辑： infinity 2019-7-25

采纳的回答： infinity

4 个评论
显示 2更早的评论隐藏 2更早的评论

DARLINGTON ETAJE 2019-7-24

radius = 5;

center = [10 15];

rotation = pi/3;

translation = [-0.5 -0.6];

rotTForm = [cos(rotation) sin(rotation); -sin(rotation) cos(rotation)];

viscircles(center,radius,'Color','b');

hold on;

%Circle just needs to be translated, as rotation won't have any effect on

%visuals

% viscircles(center+translation,radius,'Color','r');

% centerLines = center + [0 radius; 0 0; radius 0];

% rotatedLines = (centerLines - center)*rotTForm + center + translation;

% plot(centerLines(:,1), centerLines(:,2),'-.');

% hold on

% plot(rotatedLines(:,1), rotatedLines(:,2),'-.');

DARLINGTON ETAJE 2019-7-24

not exactly though

请先登录，再进行评论。

请先登录，再回答此问题。

Answer 1

infinity 2019-7-25

0
链接

此回答的直接链接

https://ww2.mathworks.cn/matlabcentral/answers/473180-circle-rotating-and-whirling#answer_384730

编辑：infinity 2019-7-25

在 MATLAB Online 中打开

Hello,

You can also refer this code,

close all
t = linspace(0,2*pi);
x = cos(t);
y = sin(t);
r1 = 3;
plot(r1*x,r1*y)                % plot circle of radius 3
r2 = 2;
r3 = 1;
x2 = r2*cos(-t);
y2 = r2*sin(-t);
axis equal
hold on
for i = 1:length(t)
    center = [x2(i),y2(i)];
    h = viscircles(center,r3,'color','r');
    pause(0.1)
    delete(h)
end
hold off

where "r1" is radius of circle 1, and r3 is radius of inner circle.

0 个评论
显示 -2更早的评论隐藏 -2更早的评论

请先登录，再进行评论。

Answer 2

darova 2019-7-24

0
链接

此回答的直接链接

https://ww2.mathworks.cn/matlabcentral/answers/473180-circle-rotating-and-whirling#answer_384618

在 MATLAB Online 中打开

Look at my idea. Do you like it?

t = linspace(0,2*pi);
x = cos(t);
y = sin(t);
plot(3*x,3*y)                % plot circle of radius 10
axis equal
hold on
for t0 = t
    h = plot(2*cos(t0),2*sin(t0),'or');
    pause(0.03)
    delete(h)
end
hold off