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

Kitonum
Пн мар 25, 2019 1:08 pm
Форум: Maple
Тема: Kernel connection has been lost...
Ответы: 8
Просмотры: 289

Re: Kernel connection has been lost...

Maple пытается символьно вычислить этот интеграл (что вероятно невозможно) и программа зависает. Проблема легко решается, если интеграл считать численно: restart; with(Student[VectorCalculus]): ArcLength(`<,>`(cos(t)^(1/100), sin(t)^(1/100)), t = 0 .. (1/2)*Pi, output = integral); evalf(%); https://...
Kitonum
Пт мар 22, 2019 9:06 pm
Форум: Maple
Тема: Метод Пикара
Ответы: 9
Просмотры: 175

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

Конечно я имел в виду решение в аналитическом виде, а не в процедурном. См. например статью в википедии и пример там https://en.wikipedia.org/wiki/Picard%E2%80%93Lindel%C3%B6f_theorem
Kitonum
Пт мар 22, 2019 8:20 pm
Форум: Maple
Тема: Метод Пикара
Ответы: 9
Просмотры: 175

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

Markiyan, метод Пикара (он же метод последовательных приближений или метод итераций) для дифуров на каждом шаге возвращает не число, а некоторую функцию, которая получается как результат вычисления интеграла с переменным верхним пределом. Как вы предполагаете считать такой интеграл численно? Можно к...
Kitonum
Чт мар 21, 2019 7:09 pm
Форум: Maple
Тема: Метод Пикара
Ответы: 9
Просмотры: 175

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

Почитайте статью https://ru.wikipedia.org/wiki/%D0%9B%D0%B8%D0%BF%D1%88%D0%B8%D1%86%D0%B5%D0%B2%D0%BE_%D0%BE%D1%82%D0%BE%D0%B1%D1%80%D0%B0%D0%B6%D0%B5%D0%BD%D0%B8%D0%B5 про свойства липшицевых отображений.
Kitonum
Чт мар 21, 2019 12:15 am
Форум: Maple
Тема: Метод Пикара
Ответы: 9
Просмотры: 175

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

То, что Вы написали, это не метод Пикара, а что-то непонятное. Метод Пикара будет работать, если программа на каждом шаге сможет вычислить символьно некоторый интеграл. В данном примере Maple вычисляет только первые 2 интеграла. Чтобы интегралы вычислялись и дальше, я на каждом шаге использую прибли...
Kitonum
Чт мар 07, 2019 11:36 pm
Форум: Maple
Тема: МНК
Ответы: 8
Просмотры: 136

Re: МНК

Нахождение суммы квадратов отклонений для найденного решения:
restart;
with(LinearAlgebra):
Eq1:=5*x+7*y=14;
Eq2:=3*x+2*y=12;
Eq3:=7*x+y=9;
Eq4:=6*x+5*y=17;
Sol:=LeastSquares({Eq1,Eq2,Eq3,Eq4}, {x,y});
evalf(eval(`+`(op(map((lhs-rhs), [Eq1,Eq2,Eq3,Eq4])^~2)), Sol));
Kitonum
Пн мар 04, 2019 6:15 pm
Форум: Maple
Тема: МНК
Ответы: 8
Просмотры: 136

Re: МНК

Не надо.
Kitonum
Пн мар 04, 2019 5:42 pm
Форум: Maple
Тема: МНК
Ответы: 8
Просмотры: 136

Re: МНК

Для вашей задачи есть отдельная команда LinearAlgebra:-LeastSquares . Пакет linalg давно устарел и его лучше не использовать:
restart;
with(LinearAlgebra):
Eq1:=5*x+7*y=14;
Eq2:=3*x+2*y=12;
Eq3:=7*x+y=9;
Eq4:=6*x+5*y=17;
Sol:=LeastSquares({Eq1,Eq2,Eq3,Eq4}, {x,y});
evalf(Sol);
Kitonum
Ср фев 27, 2019 2:56 pm
Форум: Maple
Тема: Нарисовать точки в 3D - ошибка floating-point
Ответы: 6
Просмотры: 135

Re: Нарисовать точки в 3D - ошибка floating-point

Если точки рисуются в разных стилях, то придётся задавать отдельными командами. Замените последнюю строку вашего кода следующим: A:=pointplot3d([v1, v2, v3, v4, v5, v6, o], color = red, symbol=solidsphere, symbolsize=17): B:=pointplot3d([w1, w2, w3, w4, w5, w6], color = blue, symbol=solidsphere, sym...
Kitonum
Сб фев 23, 2019 9:56 pm
Форум: Maple
Тема: Нарисовать точки в 3D - ошибка floating-point
Ответы: 6
Просмотры: 135

Re: Нарисовать точки в 3D - ошибка floating-point

Скобки не нужны, если заданы отдельно 3 вектора, скажем X - вектор из первых координат ваших точек, Y - вектор из вторых координат, Z - вектор из третьих координат (в вашем примере это будут шести-мерные векторы): restart; with(plots): a := 2: b := 5: v1 := <a*b, -a-b, 1>: v2 := <a*b, 1, -a-b>: v3 :...
Kitonum
Чт фев 21, 2019 6:04 pm
Форум: Maple
Тема: Нарисовать точки в 3D - ошибка floating-point
Ответы: 6
Просмотры: 135

Re: Нарисовать точки в 3D - ошибка floating-point

Вы забыли поставить знак умножения между a и b . Для Maple ab это просто символ. Также v1, v2, v3, v4, v5, v6 должны быть окружены скобками (квадратными или фигурными). Ещё кое-что подправил: restart; with(plots): a := 2: b := 5: v1 := <a*b, -a-b, 1>: v2 := <a*b, 1, -a-b>: v3 := <-a-b, a*b, 1>: v4 :...
Kitonum
Чт фев 07, 2019 11:07 am
Форум: Maple
Тема: Дефект в команде Solve
Ответы: 10
Просмотры: 608

Re: Дефект в команде Solve

Нужно просто поставить соответствующие скобки вокруг системы и всё заработает:
restart;
solve({S1^2*w1^2+S2^2*w2^2+S3^2*w3^2+2*S12*w1*w2+2*S13*w1*w3+2*S23*w2*w3 = SG^2, S1P*w1+S2P*w2+S3P*w3 = SGP, w1*ws1+w2*ws2+w3*ws3 = 1}, {w1, w2, w3}, explicit);
Kitonum
Ср фев 06, 2019 11:17 am
Форум: Maple
Тема: Гиперболоид
Ответы: 12
Просмотры: 249

Re: Гиперболоид

Markiyan, кажется это проблема не Maple, а Windows, т.к. у меня в Maple 2017.3 (32 bit) всё работает нормально в Windows 10 (64 bit):
Изображение
Kitonum
Вт фев 05, 2019 11:41 pm
Форум: Maple
Тема: Гиперболоид
Ответы: 12
Просмотры: 249

Re: Гиперболоид

Markiyan, я не понял сути вашей проблемы. Сам я не использую Document Mode, только WorkSheet Mode, т.е. 1d math input.
Kitonum
Вт фев 05, 2019 11:11 pm
Форум: Maple
Тема: Гиперболоид
Ответы: 12
Просмотры: 249

Re: Гиперболоид

Кли, t это просто имя для параметра (прямые в пространстве удобно задавать параметрически), а p это параметр для выбора различных прямых. Ниже - решение проблемы для гиперболического параболоида: restart; a:=2: b:=3: N:=20: H:=1/2*(x^2/a^2-y^2/b^2): L1:=[a*(p^2+2*t)/(2*p),-b*(p^2-2*t)/(2*p),t]; L2:=...