point = [point; point(1,:)]; point1 = point; plot(point(:,1), point(:,2), '-o', 'LineWidth', 2); axis equal; grid on; % axis([... % min([point(:,1); point1(:,1); x0]) - 1,... % max([point(:,1); point1(:,1); x0]) + 1,... % min([point(:,2); point1(:,2); y0]) - 1,... % max([point(:,2); point1(:,2); y0]) + 1 % ]);

这段代码将定义的点集 point 沿着第一行和最后一行连接成一个封闭的多边形，然后将其保存到 point1 中。接着使用 plot 函数将多边形绘制出来。其中 '-o' 表示使用实线和圆形点进行绘制，'LineWidth', 2 表示线宽为 2。使用 axis equal 可以将横轴和纵轴的比例设为相等，使得图形看起来更加正常。使用 grid on 可以在图形中显示网格线。最后通过设置坐标轴的范围，使得图形中所有的点都能被完整地显示出来。

相关问题

% 设置起点和终点坐标 x1 = 12; y1 = 15; x2 = 170; y2 = 155; % 中点画线法扫描直线 dx = x2 - x1; dy = y2 - y1; if abs(dx) >= abs(dy) steps = abs(dx); else steps = abs(dy); end x_increment = dx / steps; y_increment = dy / steps; x = x1; y = y1; % 创建图形窗口 figure hold on % 绘制原始直线 plot([x1 x2], [y1 y2], 'LineWidth',2) % 定义基准点和变换矩阵 x0 = 20; y0 = 35; M = [cosd(45) -sind(45) x0*(1-cosd(45))+y0*sind(45); sind(45) cosd(45) y0*(1-cosd(45))-x0*sind(45); 0 0 1]; % 进行复合变换 for i = 1:steps % 将坐标移动到基准点 T = [1 0 -x0; 0 1 -y0; 0 0 1]; point = [x; y; 1]; point = T * point; % 进行指定变换 point = M * point; % 将坐标移回原始位置 T_inv = [1 0 x0; 0 1 y0; 0 0 1]; point = T_inv * point; % 更新坐标 x = x + x_increment; y = y + y_increment; % 绘制变换后的直线 plot([point(1) point(1)+x_increment], [point(2) point(2)+y_increment], 'r', 'LineWidth', 2) end % 添加标题 title('复合变换后的直线') 请将每一步直线变换后的图形绘制出来

将每一步直线变换后的图形绘制出来，可以在for循环中添加如下代码：

% 将坐标移动到基准点
T = [1 0 -x0; 0 1 -y0; 0 0 1];
point = [x; y; 1];
point = T * point;

% 进行指定变换
point = M * point;

% 将坐标移回原始位置
T_inv = [1 0 x0; 0 1 y0; 0 0 1];
point = T_inv * point;

% 绘制变换后的直线
plot([point(1) point(1)+x_increment], [point(2) point(2)+y_increment], 'r', 'LineWidth', 2)

% 暂停0.1秒，以便观察每一步变换后的图像
pause(0.1);

将这段代码加入到for循环中，即可在每个点处绘制变换后的直线，并在每次变换后暂停0.1秒，以便观察每一步变换后的图像。完整代码如下：

% 设置起点和终点坐标
x1 = 12; y1 = 15;
x2 = 170; y2 = 155;

% 中点画线法扫描直线
dx = x2 - x1;
dy = y2 - y1;
if abs(dx) >= abs(dy)
    steps = abs(dx);
else
    steps = abs(dy);
end
x_increment = dx / steps;
y_increment = dy / steps;
x = x1;
y = y1;

% 创建图形窗口
figure
hold on

% 绘制原始直线
plot([x1 x2], [y1 y2], 'LineWidth',2)

% 定义基准点和变换矩阵
x0 = 20; y0 = 35;
M = [cosd(45) -sind(45) x0*(1-cosd(45))+y0*sind(45); sind(45) cosd(45) y0*(1-cosd(45))-x0*sind(45); 0 0 1];

% 进行复合变换
for i = 1:steps
    % 将坐标移动到基准点
    T = [1 0 -x0; 0 1 -y0; 0 0 1];
    point = [x; y; 1];
    point = T * point;
    
    % 进行指定变换
    point = M * point;
    
    % 将坐标移回原始位置
    T_inv = [1 0 x0; 0 1 y0; 0 0 1];
    point = T_inv * point;
    
    % 绘制变换后的直线
    plot([point(1) point(1)+x_increment], [point(2) point(2)+y_increment], 'r', 'LineWidth', 2)
    
    % 暂停0.1秒，以便观察每一步变换后的图像
    pause(0.1);
    
    % 更新坐标
    x = x + x_increment;
    y = y + y_increment;
end

% 添加标题
title('复合变换后的直线')

% 设置起点和终点坐标 x1 = 12; y1 = 15; x2 = 170; y2 = 155; % 中点画线法扫描直线 dx = x2 - x1; dy = y2 - y1; if abs(dx) >= abs(dy) steps = abs(dx); else steps = abs(dy); end x_increment = dx / steps; y_increment = dy / steps; x = x1; y = y1; % 创建图形窗口 figure hold on % 绘制原始直线 plot([x1 x2], [y1 y2], 'LineWidth', 2) % 定义基准点和变换矩阵 x0 = 20; y0 = 35; T = [1 0 -x0; 0 1 -y0; 0 0 1]; M = [cosd(-45) -sind(-45) 0; sind(-45) cosd(-45) 0; 0 0 1]; T_inv = [1 0 x0; 0 1 y0; 0 0 1]; % 进行复合变换 for i = 1:steps % 将坐标移动到基准点 point = [x; y; 1]; point = T * point; % 进行指定变换 point = M * point; % 将坐标移回原始位置 point = T_inv * point; % 更新坐标 x = x + x_increment; y = y + y_increment; % 绘制变换后的直线 new_x = point(1); new_y = point(2); plot([new_x new_x+x_increment], [new_y new_y+y_increment], 'r', 'LineWidth', 2) end % 添加标题 title('复合变换后的直线') 请将这段代码改为绘制每一步变换图型

好的，以下是修改后的代码，它会绘制每一步变换后的图形：

% 设置起点和终点坐标
x1 = 12; y1 = 15; x2 = 170; y2 = 155;

% 中点画线法扫描直线
dx = x2 - x1; dy = y2 - y1;
if abs(dx) >= abs(dy)
    steps = abs(dx);
else
    steps = abs(dy);
end
x_increment = dx / steps;
y_increment = dy / steps;
x = x1; y = y1;

% 创建图形窗口
figure
hold on

% 绘制原始直线
plot([x1 x2], [y1 y2], 'LineWidth', 2)

% 定义基准点和变换矩阵
x0 = 20; y0 = 35;
T = [1 0 -x0; 0 1 -y0; 0 0 1];
M = [cosd(-45) -sind(-45) 0; sind(-45) cosd(-45) 0; 0 0 1];
T_inv = [1 0 x0; 0 1 y0; 0 0 1];

% 进行复合变换
for i = 1:steps
    % 将坐标移动到基准点
    point = [x; y; 1];
    point = T * point;
    
    % 进行指定变换
    point = M * point;
    
    % 将坐标移回原始位置
    point = T_inv * point;
    
    % 更新坐标
    x = x + x_increment;
    y = y + y_increment;
    
    % 绘制变换后的直线
    new_x = point(1);
    new_y = point(2);
    plot([new_x new_x+x_increment], [new_y new_y+y_increment], 'r', 'LineWidth', 2)
    
    % 绘制变换后的图形
    rectangle('Position', [new_x, new_y, 10, 10], 'FaceColor', 'b');
    axis equal
    pause(0.1);
end

% 添加标题
title('复合变换后的直线')

在这个修改后的代码中，我们使用了 `rectangle` 函数来绘制每一步变换后的矩形图形，并使用 `axis equal` 函数来使坐标轴比例相等，保证图形不会被拉伸或压缩。同时，我们使用 `pause(0.1)` 函数来在每一步变换后暂停 0.1 秒，使得我们能够逐步观察变换的过程。