Symbolic Math Toolbox™ предлагает и числовые и символьные решатели уравнения. Для сравнения числовых и символьных решателей смотрите, Выбирают Numeric or Symbolic Solver. Уравнение или система уравнений могут иметь несколько решений. Чтобы найти эти решения численно, используйте функциональный vpasolve
. Для полиномиальных уравнений, vpasolve
возвращает все решения. Для неполиномиальных уравнений, vpasolve
возвращает первое решение, которое это находит. Эти примеры показывают вам, как использовать vpasolve
найти решения и полиномиальных и неполиномиальных уравнений, и как получить эти решения произвольной точности.
Используйте vpasolve
найти все решения функции .
syms f(x)
f(x) = 6*x^7-2*x^6+3*x^3-8;
sol = vpasolve(f)
sol =
vpasolve
возвращает семь корней функции, как ожидалось, потому что функция является полиномом степени семь.
График функции показывает периодические нули, с увеличением наклонов в нулевых точках как увеличения.
syms x h = fplot(exp(x/7)*cos(2*x),[-2 25]); grid on
Используйте vpasolve
найти нуль функционального f
. Обратите внимание на то, что vpasolve
возвращает только одно решение неполиномиального уравнения, даже если существуют несколько решений. На повторных вызовах, vpasolve
возвращает тот же результат.
f = exp(x/7)*cos(2*x); for k = 1:3 vpasolve(f,x) end
ans =
ans =
ans =
Чтобы найти несколько решений, установите опцию 'Random'
к true
. Это делает vpasolve
выберите начальные точки случайным образом. Для получения информации об алгоритме, который выбирает случайные начальные точки, см. Алгоритмы на vpasolve
страница.
for k = 1:3 vpasolve(f,x,'Random',true) end
ans =
ans =
ans =
Найти нуль близко к , установите начальную точку 10
.
vpasolve(f,x,10)
ans =
Найти нуль близко к , установите начальную точку 1000
.
vpasolve(f,x,1000)
ans =
Найти нуль в области значений , установите поисковую область значений на [15 25]
.
vpasolve(f,x,[15 25])
ans =
Найти несколько нулей в области значений [15 25]
, вы не можете вызвать vpasolve
неоднократно, потому что это возвращает тот же результат на каждом вызове, как ранее показано. Вместо этого установите поисковую область значений и установите 'Random'
к true
.
for k = 1:3 vpasolve(f,x,[15 25],'Random',true) end
ans =
ans =
ans =
Поскольку 'Random'
выбирает начальные точки случайным образом, то же решение может быть найдено на последовательных вызовах.
Создайте функциональный findzeros
систематически находить все нули для f
в данной поисковой области значений, в заданном ошибочном допуске. Функция запускается с входной области значений поиска и вызывает vpasolve
найти нуль. Затем это разделяет поисковую область значений в два вокруг нулевого значения и рекурсивно вызывает себя с новыми поисковыми областями значений как входные параметры, чтобы найти больше нулей.
Функции объясняют раздел разделом здесь.
Объявите функцию с тремя входными параметрами и одним выходом. Первый вход является функцией, второй вход является областью значений, и дополнительный третий вход позволяет вам задавать ошибку между нулем и верхними и нижними границами, сгенерированными от него.
function sol = findzeros(f,range,err)
Если вы не задаете дополнительный аргумент для ошибочного допуска, findzeros
наборы err
к 0.001
.
if nargin < 2 err = 1e-3; end
Найдите нуль в поисковой области значений с помощью vpasolve
.
sol = vpasolve(f,range);
Если vpasolve
не находит нуль, выход.
if(isempty(sol)) return
Если vpasolve
находит нуль, разделите поисковую область значений в две поисковых области значений выше и ниже нуля.
else
lowLimit = sol-err;
highLimit = sol+err;
Вызовите findzeros
с более низкой поисковой областью значений. Если findzeros
возвращает нули, скопируйте значения в массив решения и отсортируйте их.
temp = findzeros(f,[range(1) lowLimit],1); if ~isempty(temp) sol = sort([sol temp]); end
Вызовите findzeros
с более высокой поисковой областью значений. Если findzeros
возвращает нули, скопируйте значения в массив решения и отсортируйте их.
temp = findzeros(f,[highLimit range(2)],1); if ~isempty(temp) sol = sort([sol temp]); end return end end
Целая функция findzeros
следующие. Сохраните эту функцию как findzeros.m
в текущей папке.
function sol = findzeros(f,range,err) if nargin < 3 err = 1e-3; end sol = vpasolve(f,range); if(isempty(sol)) return else lowLimit = sol-err; highLimit = sol+err; temp = findzeros(f,[range(1) lowLimit],1); if ~isempty(temp) sol = sort([sol temp]); end temp = findzeros(f,[highLimit range(2)],1); if ~isempty(temp) sol = sort([sol temp]); end return end end
Вызовите findzeros
с поисковой областью значений [15 25]
найти все нули в той области значений для f(x) = exp(x/7)*cos(2*x)
, в ошибочном допуске по умолчанию.
syms f(x)
f(x) = exp(x/7)*cos(2*x);
sol = findzeros(f,[15 25])'
sol =
Используйте digits
установить точность решений, возвращенных vpasolve
. По умолчанию, vpasolve
возвращает решения точности 32 значащих цифр.
f = exp(x/7)*cos(2*x); vpasolve(f)
ans =
Используйте digits
увеличить точность до 64 значащих цифр. При изменении digits
, гарантируйте, что вы сохраняете его текущее значение так, чтобы можно было восстановить его.
digitsOld = digits; digits(64) vpasolve(f)
ans =
Затем измените точность решений 16 значащих цифр.
digits(16)
Рассмотрите следующую систему уравнений.
График уравнений для и показывает, что три поверхности пересекаются в двух точках. Чтобы лучше визуализировать график, используйте view
. Чтобы масштабировать значения палитры, используйте caxis
.
syms x y z eqn1 = z == 10*(cos(x) + cos(y)); eqn2 = z == x+y^2-0.1*x^2*y; eqn3 = x+y-2.7 == 0; equations = [eqn1 eqn2 eqn3]; fimplicit3(equations) axis([0 2.5 0 2.5 -20 10]) title('System of Multivariate Equations') view(69, 28) caxis([-15 10])
Используйте vpasolve
найти точку, где поверхности пересекаются. Функциональный vpasolve
возвращает структуру. Получить доступ к x
Y
-, и z
- значения решения, индексируйте в структуру.
sol = vpasolve(equations); [sol.x sol.y sol.z]
ans =
Чтобы искать область пробела решения, укажите поисковые диапазоны для переменных. Если вы указываете диапазоны и , затем vpasolve
функционируйте ищет ограниченную показанную область.
Используйте vpasolve
найти решение для этой поисковой области значений. Не использовать поисковую область значений для , установите третью поисковую область значений на [NaN NaN]
.
vars = [x y z]; range = [0 1.5; 1.5 2.5; NaN NaN]; sol = vpasolve(equations, vars, range); [sol.x sol.y sol.z]
ans =
Чтобы найти несколько решений, установите 'Random'
опция к true
. Это делает vpasolve
используйте случайные начальные точки на последовательных запусках. 'Random'
опция может использоваться в сочетании с поисковыми областями значений, чтобы сделать vpasolve
используйте случайные начальные точки в поисковой области значений. Поскольку 'Random'
выбирает начальные точки случайным образом, то же решение может быть найдено на последовательных вызовах. Вызовите vpasolve
неоднократно, чтобы убеждаться вы находите оба решения.
clear sol range = [0 3; 0 3; NaN NaN]; for k = 1:5 temp = vpasolve(equations,vars,range,'Random',true); sol(k,1) = temp.x; sol(k,2) = temp.y; sol(k,3) = temp.z; end sol
sol =
Постройте уравнения. Наложите решения как график рассеивания точек с желтым X
маркеры с помощью scatter3
. Чтобы лучше визуализировать график, сделайте две из поверхностей прозрачным использованием alpha
. Масштабируйте палитру к значениям графика с помощью caxis
, и измените перспективу с помощью view
.
vpasolve
находит решения на пересечении поверхностей сформированными уравнениями как показано.
clf ax = axes; h = fimplicit3(equations); h(2).FaceAlpha = 0; h(3).FaceAlpha = 0; axis([0 2.5 0 2.5 -20 10]) hold on scatter3(sol(:,1),sol(:,2),sol(:,3),600,'yellow','X','LineWidth',2) title('Randomly Found Solutions in Specified Search Range') cz = ax.Children; caxis([0 20]) view(69,28) hold off
Наконец, восстановите старое значение digits
для дальнейших вычислений.
digits(digitsOld)