matlab给出两个三维点和半径画圆柱体程序

以下是使用Matlab绘制两个三维点和半径画圆柱体的示例程序：

% 定义两个三维点和半径
p1 = [1,2,3];
p2 = [4,5,6];
r = 2;

% 计算圆柱体高度和方向向量
h = norm(p2-p1);
dir = (p2-p1)/h;

% 计算圆柱体底面圆心
center = (p1+p2)/2;

% 计算底面圆上的点
theta = linspace(0,2*pi,50);
x = center(1) + r*cos(theta);
y = center(2) + r*sin(theta);
z = center(3)*ones(size(theta));

% 绘制圆柱体
[X,Y,Z] = cylinder(r,50);
Z = Z*h;
[X,Y,Z] = transformcylinder(X,Y,Z,dir,center);
surf(X,Y,Z,'FaceColor','blue','EdgeColor','none');
axis equal;
view(3);
hold on;

% 绘制底面圆
plot3(x,y,z,'linewidth',2,'color','red');

% 绘制顶面圆
plot3(x,y,z+h,'linewidth',2,'color','red');

function [X2,Y2,Z2] = transformcylinder(X,Y,Z,dir,center)
% 将圆柱体变换到正确的位置和方向
X2 = X*dir(1) + Y*dir(2) + Z*dir(3) + center(1);
Y2 = -X*dir(2) + Y*dir(1) + Z*0 + center(2);
Z2 = -X*dir(3) + Y*0 + Z*dir(1) + center(3);
end

运行该程序后，将绘制出两个三维点和半径画圆柱体的效果图。