用matlab写三种证明影响电场强度的因素能够影响极化强度的代码

以下是用MATLAB编写的三种影响电场强度的因素能够影响极化强度的代码示例：

1. 距离因素的影响：

% 定义电荷和距离
Q = 1; % 电荷量
r = linspace(0.1, 10, 100); % 距离范围

% 计算电场强度和极化强度
E = Q ./ (4 * pi * 8.854e-12 * r .^ 2); % 电场强度
P = 8.854e-12 * E; % 极化强度

% 绘制图像
figure;
plot(r, E, 'r-', r, P, 'b--');
xlabel('距离(m)');
ylabel('强度');
title('距离因素的影响');
legend('电场强度', '极化强度');

2. 介质常数因素的影响：

% 定义电荷和距离
Q = 1; % 电荷量
r = 1; % 距离

% 定义不同介质的电容率
e0 = 8.854e-12; % 真空电容率
e1 = 5 * e0; % 介质1的电容率
e2 = 10 * e0; % 介质2的电容率

% 计算电场强度和极化强度
E1 = Q ./ (4 * pi * e1 * r .^ 2); % 介质1中的电场强度
E2 = Q ./ (4 * pi * e2 * r .^ 2); % 介质2中的电场强度
P1 = (e1 - e0) * E1; % 介质1中的极化强度
P2 = (e2 - e0) * E2; % 介质2中的极化强度

% 绘制图像
figure;
plot([1, 2], [E1, E2], 'r-', [1, 2], [P1, P2], 'b--');
xticks([1, 2]);
xticklabels({'介质1', '介质2'});
xlabel('介质');
ylabel('强度');
title('介质常数因素的影响');
legend('电场强度', '极化强度');

3. 电荷量因素的影响：

% 定义距离和介质
r = 1; % 距离
e = 8.854e-12; % 介质常数

% 定义不同电荷量
Q1 = 1e-6; % 电荷量1
Q2 = 1e-5; % 电荷量2
Q3 = 1e-4; % 电荷量3

% 计算电场强度和极化强度
E1 = Q1 ./ (4 * pi * e * r .^ 2); % 电荷量1的电场强度
E2 = Q2 ./ (4 * pi * e * r .^ 2); % 电荷量2的电场强度
E3 = Q3 ./ (4 * pi * e * r .^ 2); % 电荷量3的电场强度
P1 = (Q1 / e) ./ (4 * pi * r .^ 2); % 电荷量1的极化强度
P2 = (Q2 / e) ./ (4 * pi * r .^ 2); % 电荷量2的极化强度
P3 = (Q3 / e) ./ (4 * pi * r .^ 2); % 电荷量3的极化强度

% 绘制图像
figure;
plot([1, 2, 3], [E1, E2, E3], 'r-', [1, 2, 3], [P1, P2, P3], 'b--');
xticks([1, 2, 3]);
xticklabels({'电荷量1', '电荷量2', '电荷量3'});
xlabel('电荷量');
ylabel('强度');
title('电荷量因素的影响');
legend('电场强度', '极化强度');