Найдено 1340 результатов

Markiyan Hirnyk
Пн апр 15, 2019 9:10 am
Форум: Maple
Тема: Ошибка в sum
Ответы: 0
Просмотры: 121

Ошибка в sum

s := sum(binomial(m-k-1, n-1)*binomial(k+n, n), k = 0 .. m-n); sin(Pi*n)*JacobiP(m-n, -m, 2*n, -1)/sin(Pi*m) eval(s, {m = 5, n = 2}); Error, numeric exception: division by zero MultiSeries:-limit(s, m = 5) assuming n=2; 0 limit(s, {m = 5, n = 2}); undefined Замечу, что Мма 11.3 находит правильное в...
Markiyan Hirnyk
Пн апр 15, 2019 9:04 am
Форум: Maple
Тема: Бесполезная первообразная
Ответы: 0
Просмотры: 115

Бесполезная первообразная

Разработчики одной из предыдущих версий Мэйпла кичились следующим результатом int(cos(x)^n, x) assuming n::posint; (Sum((Product(1+1/(n-2*j), j = 1 .. i))*cos(x)^(n-2*i-1), i = 0 .. ceil((1/2)*n)-1))*sin(x)/n+(Product(1-1/(n-2*j), j = 0 .. ceil((1/2)*n)-1))*x В действительности он не работает и поэт...
Markiyan Hirnyk
Пн апр 15, 2019 8:58 am
Форум: Maple
Тема: Ошибка в simplify
Ответы: 0
Просмотры: 113

Ошибка в simplify

S := sum(binomial(n-m, k)/(n-k), k = 0 .. n-m); factorial(n-m)*JacobiP(n-m, -n, -n+m-1, 3)/(n*pochhammer(-n+1, n-m)) evalf(eval(S, [n = 3, m = 1])); 2.333333333 eval(simplify(S), [n = 3, m = 1]); Error, numeric exception: division by zero
Markiyan Hirnyk
Пт апр 12, 2019 7:17 pm
Форум: Maple
Тема: Ошибка minimize
Ответы: 0
Просмотры: 113

Ошибка minimize

Код: Выделить всё

minimize((-1/x-1)^x, x, location);
-infinity, {[{x = -1}, -infinity]}

Математика дает правильный ответ.
Markiyan Hirnyk
Пн апр 08, 2019 1:05 pm
Форум: Maple
Тема: Ошибка при интегрировании
Ответы: 2
Просмотры: 192

Re: Ошибка при интегрировании

Из этой серии n := 100: Digits := 15: int((1-log(x)/n)^n, x = 1 .. exp(n), numeric, epsilon = 0.1e-2); 25.0871799515692 Ни тени сомнения. Однако правильный ответ близок к sqrt(100*Pi/2.); 12.5331413731550 Математика выдает 11.8772 с AccuracyGoal->3
Markiyan Hirnyk
Пт апр 05, 2019 10:55 am
Форум: Maple
Тема: Неясная справка по ?dsolve,system
Ответы: 0
Просмотры: 130

Неясная справка по ?dsolve,system

Выполнив ?dsolve,system , читаем Calling Sequence dsolve(ODE_sys, optional_1, optional_2,...) Parameters ODE_sys - system of ODEs; it can contain inequations Восхищаясь и следуя справке, выполняем dsolve({diff(z(x), x) = z(x), diff(y(x), x) <= z(x)}, {y(x), z(x)}); Error, (in dsolve) invalid input: ...
Markiyan Hirnyk
Чт апр 04, 2019 9:30 am
Форум: Maple
Тема: Нет рисунков в Online Help
Ответы: 0
Просмотры: 116

Нет рисунков в Online Help

Пр открытии poincare в Гугле и Яндексе не видно рисунков. Они имеются в мэйпловской справке

Код: Выделить всё

?poincare
Еще один пример халтуры Мэйплсофта.
Markiyan Hirnyk
Вс мар 31, 2019 2:12 pm
Форум: Maple
Тема: Ошибка в построении массива решений дифференциальной системы
Ответы: 5
Просмотры: 285

Re: Ошибка в построении массива решений дифференциальной системы

Nusha341, пожалуйста, объясните
Но это очень сильная погрешность
Markiyan Hirnyk
Вс мар 31, 2019 10:04 am
Форум: Maple
Тема: Ошибка в построении массива решений дифференциальной системы
Ответы: 5
Просмотры: 285

Re: Ошибка в построении массива решений дифференциальной системы

Вот упрощенная версия вашей проблемы и один из возможных способов ее решения:

Код: Выделить всё

restart; L := 20*Pi; for k from 0 to L do print(k) end do;
Error, final value in for loop must be numeric or character
L := floor(20*Pi); for k from 0 to L do print(k) end do;
Markiyan Hirnyk
Сб мар 30, 2019 8:09 pm
Форум: Maple
Тема: Ошибка в solve
Ответы: 0
Просмотры: 116

Ошибка в solve

Сравним restart; `assuming`([solve({abs(sqrt(x+2)-2) < eps}, x)], [eps > 0, eps < 2]); {2 < x, x < eps^2+4*eps+2}, {x < 2, eps^2-4*eps+2 < x} и `assuming`([solve({abs(sqrt(x+2)-2) < eps}, x)], [eps > 0, eps < 10]) {2 < x, x < eps^2+4*eps+2} При увеличении оценки на eps множество решений должно увели...
Markiyan Hirnyk
Ср мар 27, 2019 3:09 pm
Форум: Maple
Тема: Kernel connection has been lost...
Ответы: 8
Просмотры: 419

Re: Kernel connection has been lost...

Код C1 := 2*t*v*w-t^2-v^2-w^2+1 > 0; C2 := 1-w^2+(w^2-1)*x^2-y^2+v^2*(y^2-1)+2*w*y*z-z^2+2*v*x*(-w*y+z)+t^2*(z^2-1)+2*t*(x*(-w*z+y)+v*(-y*z+w)) > 0; C3 := -1 < t and t < 1 and -1 < v and v < 1 and -1 < w and w < 1 and -1 < x and x < 1 and -1 < y and y < 1 and -1 < z and z < 1; C4 := -u^2*(t^2+v^2-1)...
Markiyan Hirnyk
Пн мар 25, 2019 1:16 pm
Форум: Maple
Тема: Kernel connection has been lost...
Ответы: 8
Просмотры: 419

Re: Kernel connection has been lost...

Kitonum, спасибо за обход. Качественный софт такой ошибки не должен допускать в принципе.
PS. Вдобавок, та же оказия с

Код: Выделить всё

restart; with(Student[VectorCalculus]):
plot(p->evalf(ArcLength(`<,>`(cos(t)^p, sin(t)^p), t = 0 .. (1/2)*Pi, output = integral)),0..1);
Markiyan Hirnyk
Пн мар 25, 2019 12:27 pm
Форум: Maple
Тема: Kernel connection has been lost...
Ответы: 8
Просмотры: 419

Re: Kernel connection has been lost...

Очередной дефект:

Код: Выделить всё

restart; with(Student[VectorCalculus]):
ArcLength(`<,>`(cos(t)^(1/100), sin(t)^(1/100)), t = 0 .. (1/2)*Pi, output = value);
Markiyan Hirnyk
Пт мар 22, 2019 9:22 pm
Форум: Maple
Тема: Метод Пикара
Ответы: 9
Просмотры: 369

Re: Метод Пикара

Kitonum , то, что Вы имели в виду - это Ваше личное дело. В доказательстве теоремы о существовании решения задачи Коши методом Пикара нет никакого "решения в аналитическом виде". В русскоязычной версии статьи из Вики примера нет. Относительно символьных вычислений приведу такой пример. Ра...
Markiyan Hirnyk
Пт мар 22, 2019 8:30 pm
Форум: Maple
Тема: Метод Пикара
Ответы: 9
Просмотры: 369

Re: Метод Пикара

Kitonum , вот пример f := x-> evalf(Int(t^t, t = 0 .. x)) : f(.3); 0.2334009959 f(3/10); 0.2334009959 g := x-> evalf(Int(f(t), t = 0 .. x)) : g(.5); 0.09743848197 Вы пишите но это уже не метод Пикара в чистом виде Вас не затруднит дать ссылку в обоснование Ваших слов?