2014 dxdy logo

Научный форум dxdy

Математика, Физика, Computer Science, Machine Learning, LaTeX, Механика и Техника, Химия,
Биология и Медицина, Экономика и Финансовая Математика, Гуманитарные науки




 
 Maple очень долго вычисляет
Сообщение28.06.2021, 16:25 
Доброго времени суток!
Пытаюсь вычислить с помощью Maple2019 интеграл, но не получается: ждал минут 10, а он таки не вычислил.
Пробовал задавать свои функции и таким образом
Код:
f:=(x,n,m,s)->

и таким
Код:
f:=

При втором способе вроде бы график строит быстрее, но интеграл также не считает.

Код:
n := 15;
m := 3;
s := 1;

a := 2*(2 + 2/m + s)/(n^2*(1/m + s)) + 2*(2 + s)/((n + 4)^2*(1/m + s));
l := a - 2/n^2 + 2/(n + 4)^2;

g := piecewise(0 < x, exp(-1/x), 0);

indl := piecewise(0 <= x and x <= s, 1, 0);
ind := piecewise(0 <= x and x <= 1/m, 1, 0);

f := (subs(x = 1/m - x, g)*a/(subs(x = 1/m - x, g) + g) - a + 2/n^2)*ind;
u := (subs(x = s - x, g)*l/(subs(x = s - x, g) + g) - l + 2/(n + 4)^2)*indl;

r := evalf(int(f + subs(x = -x + 1 + 1/3, u), x = 0 .. t)) + 2/n^2
evalf(int(r, t = 0 .. 4/3))


Получается, последняя строчка для него неподъемная: интеграл от функции $r$ вычислить не может, хотя ее график строит, но тоже не быстро.
Изображение
Вряд ли ведь проблема в Maple, это скорее я пытаюсь делать задачу не тем инструментарием.
Может кто-нибудь посоветовать, как поступить.

 
 
 
 Re: Maple очень долго вычисляет
Сообщение28.06.2021, 16:56 
Формально в последней строке текста вы записали предложение «точного» вычисления интеграла с последующим приближённым вычислением результата при помощи функции evalf. (Однако подынтегральное выражение содержит числа с плавающей точкой.) Если достаточно приближённого [численного] вычисления [интеграла], то можно сразу записать
> evalf(Int(r, t = 0 .. 4/3));
Если можно вычислять с небольшой точностью, то у меня Maple 15 (Classic Worksheet) считает быстро
Код:
> evalf(Int(r, t = 0 .. 4/3, epsilon=0.00000001));
        -.7293765986e-3
(В саму задачу не вникал. Просто посчитал. Результат не проверял.)

 
 
 
 Re: Maple очень долго вычисляет
Сообщение28.06.2021, 17:54 
Спасибо, с вашей подачи maple все-таки смог победить этот интеграл, пусть даже ему и потребовалось на это время :D

 
 
 [ Сообщений: 3 ] 


Powered by phpBB © 2000, 2002, 2005, 2007 phpBB Group