3 绘制球面xx+yy+zz=25与平面x+y+3z=52的交线用matlab编写程序

以下是一个用MATLAB编写的程序，用于绘制球面和平面的交线：

% 清空变量和图形窗口
clear;
clf;

% 定义球面和平面的方程
syms x y z;
f1 = x^2 + y^2 + z^2 - 25;
f2 = x + y + 3*z - 5.2;

% 求解交线
[sol_x, sol_y, sol_z] = solve(f1, f2, x, y, z);

% 将符号解转换为数值解
sol_x = double(sol_x);
sol_y = double(sol_y);
sol_z = double(sol_z);

% 绘制球面和平面
[xs, ys, zs] = sphere(50);
surf(xs*sqrt(25), ys*sqrt(25), zs*sqrt(25), 'FaceAlpha', 0.2, 'EdgeColor', 'none', 'FaceColor', 'blue');
hold on;
plane = @(x, y) (5.2 - x - y)/3;
fplot3(plane, [-6, 6, -6, 6], 'Color', 'red', 'LineWidth', 2);

% 绘制交线
plot3(sol_x, sol_y, sol_z, 'ro', 'MarkerSize', 10);

% 设置坐标轴标签和图例
xlabel('x');
ylabel('y');
zlabel('z');
legend('球面', '平面', '交线');

运行以上程序，将绘制出球面和平面的交线，并且显示在三维坐标系中