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

Markiyan Hirnyk
Пт фев 10, 2012 5:45 pm
Форум: Maple
Тема: Решение уравнения
Ответы: 6
Просмотры: 2277

Решение

Да, можно. Несколько вариантов: f := piecewise(x = 0, 0, x > 0, x*ln(x)^2): sol := dsolve(diff(x(t), t) = f(x(t)), x(t)) t-Intat(1/(piecewise(_a = 0, 0, 0 < _a, _a*ln(_a)^2))(_a), _a = x(t))+_C1 = 0 value(sol) t-intat(1/(piecewise(_a = 0, 0, 0 < _a, _a*ln(_a)^2))(_a), _a = x(t))+_C1 = 0 sol1 := dsol...
Markiyan Hirnyk
Чт фев 09, 2012 11:15 pm
Форум: Maple
Тема: Диаграмма Вороного
Ответы: 2
Просмотры: 1581

Диаграмма Вороного

Как создать диаграмму Вороного, применяя Maple? Диаграмма Вороного конечного множества точек S на плоскости представляет такое разбиение плоскости, при котором каждая область этого разбиения образует множество точек, более близких к одному из элементов множества S, чем к любому другому элементу множ...
Markiyan Hirnyk
Вс фев 05, 2012 3:59 pm
Форум: Maple
Тема: помогите численно подсчитать интеграл Фурье
Ответы: 10
Просмотры: 3711

Условия

Спасибо огромное, Markiyan Hirnyk. А можно ли менять порядок интегрирования, в интеграле int(exp(-t*lambda^2)*exp(I*lambda*x)*int(exp(-I*lambda*xi)*f(xi), xi = -infinity .. infinity), lambda = -infinity .. infinity) на интеграл вида int(int(exp(-I*lambda*xi)*f(xi)*exp(-t*lambda^2)*exp(I*lambda*x), ...
Markiyan Hirnyk
Чт фев 02, 2012 11:29 pm
Форум: Maple
Тема: помогите численно подсчитать интеграл Фурье
Ответы: 10
Просмотры: 3711

Порядок интегрирования

Если поменять порядок интегрирования (см. В. Зорич, т. 2), получается
int(int(exp(-I*lambda*xi)*f(xi)*exp(-t*lambda^2), lambda = -infinity .. infinity), xi = -infinity .. infinity)
piecewise(csgn(t) = 1, int(exp(-(1/4)*xi^2/t)*f(xi)*sqrt(Pi)/sqrt(t), xi = -infinity .. infinity), infinity)
Markiyan Hirnyk
Чт фев 02, 2012 2:10 pm
Форум: Maple
Тема: вопрос по textplot
Ответы: 5
Просмотры: 2004

Ссылка

Markiyan Hirnyk
Чт фев 02, 2012 10:28 am
Форум: Maple
Тема: вопрос по textplot
Ответы: 5
Просмотры: 2004

\n

Используя новую строку:
plots:-textplot([-0.3, 5, "n \n i \n u \n Q"], font = [TIMES, ROMAN, 14], color = black, axes = none)
Markiyan Hirnyk
Пт янв 27, 2012 11:00 am
Форум: Maple
Тема: Maple Аппроксимация решений систем дифф.уравнений
Ответы: 13
Просмотры: 5058

Да

Это сделать можно: sys := diff(x1(t), t) = -4*x1(t)^2, diff(x2(t), t) = x1(t)^2-x2(t); F := dsolve({sys, x1(0) = 1, x2(0) = 1}, {x1(t), x2(t)}, numeric, output = array([0, .25, .5, .75, 1])); op([1], F); op([1, 3], F); op([1, 3, 2], F); A := LinearAlgebra:-Transpose(convert(rhs(op([1, 3, 2], F)), Ma...
Markiyan Hirnyk
Чт янв 26, 2012 11:13 pm
Форум: Maple
Тема: Maple Аппроксимация решений систем дифф.уравнений
Ответы: 13
Просмотры: 5058

teolog писал(а)::o Вы похоже великолепно знаете Мепл. Огромное спасибо! Буду сейчас разбираться с Вашим примером.
И, если не затруднит, могли бы Вы ответить ещё на один вопрос.
Если Вас не затруднит, могли бы для моего случая показать пример такого склеивания двух кусков кода?
Не понял вопрос.
Markiyan Hirnyk
Чт янв 26, 2012 9:15 pm
Форум: Maple
Тема: Maple Аппроксимация решений систем дифф.уравнений
Ответы: 13
Просмотры: 5058

Если ещё более обще, то может Мепл для заданного диапазона измениния x и y автоматически найти точки пересечения двух или более траекторий (траектории являются решениями систем ДУ), и посчитать вдоль этих траекторий интеграл какой-либо функции как по координатам, так и по исключённому параметру (по...
Markiyan Hirnyk
Чт янв 26, 2012 3:46 pm
Форум: Maple
Тема: kernel connection has been lost
Ответы: 7
Просмотры: 2577

я не очень поняла смысл строки for i to 8 do for j to 8 do M[i, j] := Physics[`*`](M[i, j], Physics[`^`](alpha, 2)-1) end do end do; и вот мне решили мою задачу на другом компе с Maple 15 (правда ворованным... я не могу его использовать) и у них все получилось без каких-либо изменен...
Markiyan Hirnyk
Ср янв 25, 2012 8:24 pm
Форум: Maple
Тема: kernel connection has been lost
Ответы: 7
Просмотры: 2577

вот мой код. ео я не думаю, что он может как-то помочь. действительно, я считаю определитель символьно. но такова задача, поставленная перед мной. компьютер у меня стоит мощьный. 16гб оперативки, процессор i7-2600 3,4GHz. поэтому фразу, поменять компьютер на мощный считаю не уместной, куда мошнее? ...
Markiyan Hirnyk
Вт янв 24, 2012 6:10 pm
Форум: Maple
Тема: Вывод результата процедуры в реальном времени
Ответы: 1
Просмотры: 1088

Re: Вывод результата процедуры в реальном времени

Taketo2 писал(а):Как сделать так, чтобы процедура, содержащая цикл, выводила результат в реальном времени, а не по завершении всего цикла?

Это невозможно. Вопрос несколько раз обсуждался на MaplePrimes. Одна из ссылок http://www.mapleprimes.com/questions/12 ... r-Assigned
Markiyan Hirnyk
Пн янв 23, 2012 11:10 pm
Форум: Maple
Тема: Maple Аппроксимация решений систем дифф.уравнений
Ответы: 13
Просмотры: 5058

Если я правильно понимаю Ваш вопрос, Вам после решения системы ДУ требуется явная зависимость x2(t) oт x1(t), с которой можно работать, т.е. считать, рисовать график, интегрировать, дифференцировать и. т. далее. В Вашем примере это сделать нетрудно. > sys := diff(x1(t), t) = -4*x1(t)^2, diff(x2(t), ...
Markiyan Hirnyk
Пн янв 23, 2012 12:02 am
Форум: Maple
Тема: Maple Аппроксимация решений систем дифф.уравнений
Ответы: 13
Просмотры: 5058

teolog писал(а):Спасибо огромное!
а есть ли какие-то функции, чтобы сразу аппроксимирующую функцию в аналитическом виде из решения системы ДУ получить?
Вопрос не понял, поэтому ответить не могу. Пожалуйста приведите пример к рассматриваемой Вами системе ОДУ.