Построение двумерной области, заданной неравенствами.

Если необходимо построить двумерную область, заданную системой неравенств , то для этого можно использовать команду inequal из пакета plots. В команде inequals({f1(x, y)> c1, …, fn(x, y)> cn}, x=x1…x2, y=y1..y2, options) в фигурных скобках указывается система неравенств, определяющих область, затем размеры координатных осей и параметры. Параметры регулируют цвета открытых и закрытых границ, цвета внешней и внутренней областей, а также толщину линий границ:

– optionsfeasible=(color=red) – установка цвета внутренней области;

– optionsexcluded=(color=yellow)– установка цвета внешней области;

– optionsopen(color=blue, thickness=2)– установка цвета и толщины линии открытой границы;

– optionsclosed(color=green, thickness=3)– установка цвета и толщины линии закрытой границы.

Задание 1.2.

1. Построить график неявной функции (гиперболы): .

> with(plots):

> implicitplot(x^2/4-y^2/2=16, x=-20..20,

y=-16..16,

color=green, thickness=2);

2. Построить на одном рисунке графики астроиды , ( ) вписанной в эллипс . Выведите название линий Astroida и Ellips жирным шрифтом вместе с его уравнением курсивом. Для этого наберите следующие строки:

> with(plots):

> eq: =x^2/16+y^2/4=1:

> el: =implicitplot(eq, x=-4..4, y=-2..2, scaling=CONSTRAINED,

color=green, thickness=3):

> as: =plot([4*cos(t)^3, 2*sin(t)^3, t=0..2*Pi],

color=blue, scaling=CONSTRAINED, thickness=2):

> eq1: =convert(eq, string):

> t1: =textplot([1.5, 2.5, eq1], font=[TIMES,

ITALIC, 10], align=RIGHT):

> t2: =textplot([0.2, 2.5, " Ellips: " ], font=[TIMES,

BOLD, 10], align=RIGHT):

> t3: =textplot([1.8, 0.4, Astroida], font=[TIMES,

BOLD, 10], align=LEFT):

> display([as, el, t1, t2, t3]);

3. Построить область, ограниченную линиями: , , .

> with(plots):

> inequal({x+y> 0, x-y< =1, y=2}, x=-3..3, y=-3..3,

optionsfeasible=(color=red),

optionsopen=(color=blue, thickness=2),

optionsclosed=(color=green, thickness=3),

optionsexcluded=(color=yellow) );

Трехмерные графики. Анимация

График поверхности, заданной явной функцией.

График функции можно нарисовать, используя команду plot3d(f(x, y), x=x1…x2, y=y1…y2, options). Параметры этой команды частично совпадают с параметрами команды plot. К часто используемым параметрам команды plot3d относится light=[angl1, angl2, c1, c2, c3] – задание подсветки поверхности, создаваемой источником света из точки со сферическими координатами (angl1, angl2). Цвет определяется долями красного (c1), зеленого (c2) и синего (c3) цветов, которые находятся в интервале [0, 1]. Параметр style=opt задает стиль рисунка: POINT –точки, LINE – линии, HIDDEN – сетка с удалением невидимых линий, PATCH – заполнитель (установлен по умолчанию), WIREFRAME – сетка с выводом невидимых линий, CONTOUR – линии уровня, PATCHCONTOUR – заполнитель и линии уровня. Параметр shading=opt задает функцию интенсивности заполнителя, его значение равно xyz – по умолчанию, NONE – без раскраски.

График поверхности, заданной параметрически.

Если требуется построить поверхность, заданную параметрически: x=x(u, v), y=y(u, v), z=z(u, v), то эти функции перечисляются в квадратных скобках в команде: plot3d([x(u, v), y(u, v), z(u, v)], u=u1..u2, v=v1..v2).

График поверхности, заданной неявно.

Трехмерный график поверхности, заданной неявно уравнением , строится с помощью команды пакета plot: implicitplot3d(F(x, y, z)=c, x=x1..x2, y=y1..y2, z=z1..z2), где указывается уравнение поверхности и размеры рисунка по координатным осям.

График пространственных кривых.

В пакете plotимеется команда spacecurve для построения пространственной кривой, заданной параметрически: . Параметры команды:

> spacecurve([x(t), y(t), z(t)], t=t1..t2),

где переменная t изменяется от t1 до t2.

Анимация.

Maple позволяет выводить на экран движущиеся изображения с помощью команд animate(двумерные) и animate3d (трехмерные) из пакета plot. Среди параметров команды animate3d есть frames – число кадров анимации (по умолчанию frames=8).

Трехмерные изображения удобнее настраивать не при помощи опций команды plot3d, а используя контекстное меню программы. Для этого следует щелкнуть правой кнопкой мыши по изображению. Тогда появится контекстное меню настройки изображения. Команды этого меню позволяют изменять цвет изображения, режимы подсветки, устанавливать нужный тип осей, тип линий и управлять движущимся изображением.

Контекстное меню настройки изображения:

Задание 2.

1. Выполнить построение двух поверхностей и в пределах . Установите переменный цвет поверхностей как функцию .

> plot3d({x*sin(2*y)+y*cos(3*x), sqrt(x^2+y^2)-7}, x=-Pi..Pi, y=-Pi..Pi, grid=[30, 30], axes=FRAMED, color=x+y);

2. Построить поверхность вместе с линиями уровня:

> plot3d(1/(x^2+y^2)+0.2/((x+1.2)^2+(y-1.5)^2)+ 0.3/((x-0.9)^2+(y+1.1)^2), x=-2..2, y=-2..2.5, view=[-2..2, -2..2.5, 0..6], grid=[60, 60], shading=NONE, light=[100, 30, 1, 1, 1], axes=NONE, orientation=[65, 20], style=PATCHCONTOUR);

3. Построить примерную форму электронного облака атома. Форма электронного облака определяется двумя квантовыми числами: число l – определяет тип орбитали, число m – определяет магнитный момент электрона. При m=0 форма электронного облака задается полиномами Лежандра первого рода: . Следует построить параметрически заданную поверхность: , , , где . Вначале положите l=3. Наберите команды:

> l: =3:

> P: =(x, n)-> 1/(2^n*n! )*diff((x^2-1)^n, x$n);

> Y: =(phi)-> abs(sqrt((2*l+1)/(4*Pi))*

subs(x=cos(phi), P(x, l)));

> X0: =Y(phi)*sin(phi)*cos(theta);

> Y0: =Y(phi)*sin(phi)*sin(theta);

> Z0: =Y(phi)*cos(phi);

> plot3d([X0, Y0, Z0], phi=0..Pi, theta=0..2*Pi,

scaling=CONSTRAINED, title=" Электронное облако" );

После этого постройте формы электронного облака для l=1и l=2.

4. Построить шар :

> with(plots): implicitplot3d(x^2+y^2+z^2=4,

x=-2..2, y=-2..2, z=-2..2, scaling=CONSTRAINED);

5. Построить пространственную кривую: , ,

> with(plots):

> spacecurve([sin(t), cos(t), exp(t)], t=1..5, color=blue, thickness=2, axes=BOXED);

6. Нарисовать движущийся объект. Вначале наберите в командной строке:

> animate3d(cos(t*x)*sin(t*y), x=-Pi..Pi,

y=-Pi..Pi, t=1..2);

Щелкните по появившемуся изображению правой кнопкой мыши. В появившемся контекстном меню выполните команду Animation®Continuous. Затем снова вызовите контекстное меню и выполните команду Animation®Play. Для того, чтобы остановить движение, выполните команду Animation®Stop. Затем с помощью мыши поверните рисунок под другим углом и сделайте его вновь движущимся.

7. Выполните все контрольные задания. Результаты выполнения заданий покажите преподавателю. Сохраните файл со всеми выполненными заданиями на диск. Ответьте на все контрольные вопросы.

Контрольные задания.

1. Построить на отдельных рисунках графики функций Бесселя первого рода J_n(x) для различных ее номеров n в интервале –20< x< 20. Функции Бесселя вызываются командой BesselJ(n, x), где n – номер функции Бесселя, x – независимая переменная. Построить первые 6 функций Бесселя для n=0, 1, 2, 3, 4, 5, 6. Как они выглядят и чем отличаются друг от друга? Сделать подписи осей курсивом.

2. Построить график функции в полярных координатах при 0< j< 4p. Используйте цвет линии под названием magenta, установите толщину линии 3.

3. Построить на одном рисунке графики функции и ее асимптот и . Установить следующие параметры: цвет основной линии – голубой, асимптот – красный (установлен по умолчанию, поэтому его можно не изменять); толщина основной линии – 3, асимптоты – обычной; масштаб по координатным осям – одинаковый. Сделать надписи: какая функция относится к какой линии. Указание: использовать для преобразования в текст формул команду convert, а для построения графиков и надписей команды textplot и display из пакета plots (см. Задание 1.2, п.2)

4. Нарисовать параметрически заданную поверхность (лист Мебиуса): , , , , .

5. Задайте изменение координат в интервалах 0< v< 2p, -1< u< 1, и установите следующие параметры:

grid=[60, 10], orientation=[-106, 70], axes=FRAMED, tickmarks=[5, 8, 3].

Также выведите название рисунка, подпишите названия осей и установите одинаковый масштаб по осям.

Контрольные вопросы.

1. С помощью каких команд строятся графики на плоскости и в пространстве? Какие аргументы имеют эти команды?

2. Как называется пакет дополнительных графических команд?

3. С помощью какой команды можно построить график неявной функции? Опишите ее параметры.

4. Для чего предназначена команда display?

5. Какая команда позволяет построить двумерную область, заданную системой неравенств?

6. С помощью какой команды можно построить график пространственной кривой?

7. Какие возможности предоставляют команды animate и animate3d?

1 23	Поделиться: