Добавил:
zimbabweLSD
Опубликованный материал нарушает ваши авторские права? Сообщите нам.
Вуз:
Предмет:
Файл:файлы матлаб / initial_approx
.m fi0(1)=-log(-N(1)/2+sqrt((N(1)/2)^2+1))+U(1);
fi0(I)=log(N(I)/2+sqrt((N(I)/2)^2+1));
for i=2:I-1
fi0(i)=(fi0(I)-fi0(1))/(x(I)-x(1))*(x(i)-x(1))+fi0(1);
end
fi0=fi0';
%plot(x.*(L0*1e9),fi0.*V0,'LineWidth',LW)
%xlabel('Coordinate, nm','FontSize', FS)
%ylabel('Potential, V','FontSize', FS)
%grid on
fi0(I)=log(N(I)/2+sqrt((N(I)/2)^2+1));
for i=2:I-1
fi0(i)=(fi0(I)-fi0(1))/(x(I)-x(1))*(x(i)-x(1))+fi0(1);
end
fi0=fi0';
%plot(x.*(L0*1e9),fi0.*V0,'LineWidth',LW)
%xlabel('Coordinate, nm','FontSize', FS)
%ylabel('Potential, V','FontSize', FS)
%grid on
Соседние файлы в папке файлы матлаб