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

Alexdemath
Пн сен 09, 2013 1:09 am
Форум: Maple
Тема: Как сократить код
Ответы: 12
Просмотры: 3691

Re: Как сократить код

Запись этого кода без повторов и ненужных присваиваний: ... Большое спасибо! У меня получилось сократить код по аналогии с Вашим with(plottools): with(plots): xA := 0: yA := 4: zA := 5: xB := 3: yB := -2: zB := 1: xC := 4: yC := 5: zC := 6: xS := 3: yS := 3: zS := 2: A := [xA,yA,zA]...
Alexdemath
Пн сен 09, 2013 12:16 am
Форум: Maple
Тема: Двугранные углы треугольной пирамиды
Ответы: 10
Просмотры: 4274

Kitonum писал(а):1. Берётся точка, гарантированно лежащая внутри тетраэдра. Проще всего взять центроид. См.

Это координаты которого вычисляются так

( (xA+xB+xC+xD)/4, (yA+yB+yC+yD)/4, (zA+zB+zC+zD)/4 ) ?
Alexdemath
Вс сен 08, 2013 1:22 am
Форум: Maple
Тема: Двугранные углы треугольной пирамиды
Ответы: 10
Просмотры: 4274

Kitonum писал(а):
Alexdemath писал(а):...

Но уже, вроде бы, разобрался с алгоритмом.

Уточните, помощь уже не требуется?

Надо очень. Мой алгоритм что-то хромает :(

Спасибо, что откликнулись.
Alexdemath
Вс сен 08, 2013 1:19 am
Форум: Maple
Тема: Как сократить код
Ответы: 12
Просмотры: 3691

Re: Как сократить код

Kitonum , спасибо! В последнем своём варианте я специально сделал с присваиваниями, чтобы потом для построения других треугольных пирамид можно было указать только один раз координаты вершин (типа процедура). Если можно, то, пожалуйста, упростите ещё этот вариант с присваиваниями with(plottools...
Alexdemath
Сб сен 07, 2013 11:30 pm
Форум: Maple
Тема: Как сократить код
Ответы: 12
Просмотры: 3691

Сделал пока так (чертёж пирамиды) with(plottools): with(plots): xA := 0: yA := 4: zA :=5 : xB := 3: yB := -2: zB := 1: xC := 4: yC := 5: zC := 6: xS := 3: yS := 3: zS := 2: A:=[xA,yA,zA]: B:=[xB,yB,zB]: C:=[xC,yC,zC]: S:=[xS,yS,zS]: Ax:=[xA,0,0]: Bx:=[xB,0,0]: Cx:=[xC,0,0]: Sx:=[xS,0...
Alexdemath
Сб сен 07, 2013 10:18 pm
Форум: Maple
Тема: Как сократить код
Ответы: 12
Просмотры: 3691

Re: Пробелы

Markiyan Hirnyk писал(а):Уничтожьте образовавшиеся при копировании пробелы в P || j до P||j или выделите весь код и правой клавишей мыши преобразуйте его в Convert/ 1-D Math Input .Доложите результат. Дерзайте.

Получилось, спасибо.

А как это сделать с командой line(), не доходит :(
Alexdemath
Сб сен 07, 2013 9:47 pm
Форум: Maple
Тема: Как сократить код
Ответы: 12
Просмотры: 3691

Re: Пример

Вот пример сокращения. with(plots): with(plottools): L := [[], [0, 4, 5, "A"], [3, -2, 1, "B"], [4, 5, 6, "C"]]: for j from 2 to nops(L) do P || j := textplot3d(L[j], align = {above, right}, color = black, font = [TIMES, ROMAN, 14]) end do: display([seq(P || j, j = 2 ....
Alexdemath
Сб сен 07, 2013 8:35 pm
Форум: Maple
Тема: Как сократить код
Ответы: 12
Просмотры: 3691

Запись точек не нужно упрощать, только вынести атрибуты. А почему синтаксис неверный? Вот пример полного кода, где это использую, ошибок не показывается и график строится. with(plottools): with(plots): P1 := pointplot3d([[0,4,5], [3,-2,1], [4,5,6], [3,3,2]], symbol = solidcircle,...
Alexdemath
Сб сен 07, 2013 8:22 pm
Форум: Maple
Тема: Двугранные углы треугольной пирамиды
Ответы: 10
Просмотры: 4274

Спасибо разобрался.

Но оно вычисляет какой-то угол между плоскостями пирамиды: может оказаться как внешний, так и внутренний; а нужен именно внутренний.

Но уже, вроде бы, разобрался с алгоритмом.
Alexdemath
Сб сен 07, 2013 6:22 pm
Форум: Maple
Тема: Как сократить код
Ответы: 12
Просмотры: 3691

Как сократить код

Подскажите, как сократить (компактно записать) этот код line([0,4,0], [0,4,5], color = green, linestyle = dash), line([0,0,5], [0,4,5], color = green, linestyle = dash), line([3,0,0], [3,-2,0], color = green, linestyle = dash), line([0,-2,0], [3,-2,0], color = green, line...
Alexdemath
Сб сен 07, 2013 1:32 pm
Форум: Maple
Тема: Двугранные углы треугольной пирамиды
Ответы: 10
Просмотры: 4274

Двугранные углы треугольной пирамиды

Подскажите, как в Maple найти двугранные углы (внутренние между гранями) треугольной пирамиды A(xA,yA,zA), B(xB,yB,zB), C(xC,yC,zC), D(xD,yD,zD). Знаю, что их 6: (ABC,ABD), (ABC,AСD), (ABC,BСD), (ABD,AСD), (ABD,BСD), (ACD,BСD). Например, для A(-2,1,-1), B(-3,1,3), C(-4,2,-1), D(-2,3,1). Может у кого...
Alexdemath
Пн фев 04, 2013 12:51 pm
Форум: Maple
Тема: Критические (табличные) значения критерия Дарбина-Уотсона
Ответы: 6
Просмотры: 5695

Re: Критические (табличные) значения критерия Дарбина-Уотсон

Если Вы приведете формулы для dL и dU , то можно попытаться реализовать их в Maple. Если бы их я знал, то Maple был бы не нужен. Вообще, мне нужен сам алгоритм, чтобы реализовать их вычисления программно. Вот http://www.maplesoft.com/support/help/Maple/view.aspx?path=NAG/g01epc на официальном сайте...
Alexdemath
Пн фев 04, 2013 3:02 am
Форум: Maple
Тема: Критические (табличные) значения критерия Дарбина-Уотсона
Ответы: 6
Просмотры: 5695

Критические (табличные) значения критерия Дарбина-Уотсона

Скажите, пожалуйста, как в Maple получить Критические (табличные) значения (dL и dU) критерия Дарбина-Уотсона?
Alexdemath
Ср апр 27, 2011 2:57 am
Форум: Maple
Тема: Анимация
Ответы: 3
Просмотры: 1929

Kitonum, можно ли анимированный рисунок, созданный в Maple, сохранить отдельным файлом в формате gif.

Прошу прощения, если это элементарно.
Alexdemath
Ср апр 27, 2011 2:50 am
Форум: Maple
Тема: Построить область определения функции 3-х переменных в Maple
Ответы: 1
Просмотры: 2282

Построить область определения функции 3-х переменных в Maple

Здравствуйте. Объясните, пожалуйста, как построить область определения функции 3-х переменных u(x,y,z)=ln(xyz) в Maple? Понятно, что эта функция определена в первом, третьем, шестом и восьмом октантах, то есть область задаётся системой неравенств: I: x>0, y>0, z>0; III: x<0, y<0, z>0; VI: x<0, y>0, ...