Скачиваний:
21
Добавлен:
22.04.2021
Размер:
1.23 Кб
Скачать
clc, close all
R1=0.01;
R12=0.025;
R2=0.05;
r1=R1:0.0001:R12;
r2=R12:0.0001:R2;
U1=35310734.46*r1.^2-38967.93*log(r1)-182985.02; %введи своё U1
U2=10340.98*log(r2)+20978.8; %введи своё U2
E1=-70621468.93*r1 +38967.93./r1; %введи своё E1
E2=-10340.98./r2; %введи своё E2

figure;
subplot(2,1,1);
hold on;
set(gca,'box','on');
grid on;
plot(r1,U1,'-','color',[0 0 0]/255,'LineWidth',1.3);
plot(r2,U2,'-','color',[0 0 0]/255,'LineWidth',1.3);
plot([R12, R12], [-25000, U1(end)],'--','color',[0.5 0.5 0.5],'LineWidth',1.3);
text(R12+0.001, -18500, 'R_{12}=0.025 м', 'FontSize',14);
xlim([0.01 0.05])
ylim([-20000 5000]);
xlabel('r, м','fontsize',14);
ylabel('U, В','fontsize',14,'Rotation',0,'Position', [0.008 -7500 0]);
subplot(2,1,2);
hold on;
set(gca,'box','on');
grid on;
plot(r1,E1,'-','color',[0 0 0]/255,'LineWidth',1.3);
plot(r2,E2,'-','color',[0 0 0]/255,'LineWidth',1.3);
plot([R12, R12], [-1500000, E1(end)],'--','color',[0.5 0.5 0.5],'LineWidth',1.3);
text(R12-0.0045, -1000000, 'R_{12}=0.025 м', 'FontSize',14);
xlim([0.01 0.05])
xlabel('r, м','fontsize',14);
ylabel('E, В/м','fontsize',14,'Rotation',0,'Position', [0.008 0.5*10^6 0]);


Соседние файлы в папке Графики сфера в матлабе