Иллюстрированный самоучитель по Mathematica 5

Построение графиков функций, заданных параметрически (функция ParametricPlot)

Пример 9.10. Параболы в полярных координатах.

Применим теперь введенную нами функцию PolarXY[r_, phi_]: = {r*Cos [phi], r*sin[phi] } для вычерчивания полярных парабол r= аφ2 +bφ+с. Сначала дадим определение функции PolarXYAB для полярных парабол.

PolarXYAB[t_,a_,n,c_] := PolarXY[r=a*t~2+b*t+c,t]

Вот как теперь рисуется полярная парабола.

Иллюстрированный самоучитель по Mathematica 5 › Мультимедиа: геометрия, графика, кино, звук › Построение графиков функций, заданных параметрически (функция ParametricPlot)

Пример 9.11. Кривые второго порядка в полярных координатах.

Ну а сложно ли вычертить в полярных координатах обычную кривую второго порядка? Нисколько. Сначала дадим определение функции PolarXYAB для обычных кривых второго порядка.

PolarXYAB[t_,a_,b_] := Pol^rXY[r=1/(a+b*Cos[t]), t]

В зависимости от параметров у нас получится обычная кривая второго порядка, причем фокус будет находиться в начале координат. Вот как рисуется обычная гипербола.

Иллюстрированный самоучитель по Mathematica 5 › Мультимедиа: геометрия, графика, кино, звук › Построение графиков функций, заданных параметрически (функция ParametricPlot)

Если Вы заметили ошибку, выделите, пожалуйста, необходимый текст и нажмите CTRL + Enter, чтобы сообщить об этом редактору.