ВУЗ: Не указан
Категория: Не указан
Дисциплина: Не указана
Добавлен: 06.04.2021
Просмотров: 246
Скачиваний: 3
Кафедра математического и прикладного анализа, Тимошенко Ю.К.
15
plot2d([
parametric,sin(12*t)*cos(t),sin(12*t)*sin(t),
[t,0,2*%pi]],
[box,true],[axes,true],
[style, [lines,5]],
[color, dark-blue],
[nticks,500],
[xlabel,"SIN(12*t)*COS(t)"],
[ylabel,"SIN(12*t)*SIN(t)"],
[gnuplot_preamble,
"set term pdfcairo font ’Times-New-Roman,5’;
set key bottom center; set title ’РОМАШКА’;
set size ratio 1;"],
[gnuplot_term,pdf],
[gnuplot_out_file,"C:/TEMP/g_funct_4.pdf"]
)$
-1
-0.8
-0.6
-0.4
-0.2
0
0.2
0.4
0.6
0.8
1
-1
-0.8
-0.6
-0.4
-0.2
0
0.2
0.4
0.6
0.8
1
SI
N(1
2*
t)*S
IN
(t)
SIN(12*t)*COS(t)
РОМАШКА
Задание 14.
Построить график неявной функции, заданной уравнением
x
2
−
y
2
=
1
, (
x
∈
[
−
4
,
+4]
,
y
∈
[
−
4
,
+4]
) с помощью draw2d. Записать график в файл
g
_
f unct
_
5
.
Вариант решения.
(%i5) /* график функции, заданной неявно */
Кафедра математического и прикладного анализа, Тимошенко Ю.К.
16
kill(all)$
load(draw)$
fname:"C:/TEMP/g_funct_5"$
g:implicit(x^2-y^2=1,x,-4,4,y,-4,4)$
draw2d(
terminal=pdf, file_name=fname,
grid=true,dimensions = [1280,1024],
font="Arial", font_size=8,
ip_grid=[200,200],
background_color=gold,
color=dark-green,
line_width=5,
g
)$
-4
-3
-2
-1
0
1
2
3
4
-4
-3
-2
-1
0
1
2
3
4
Y
X
Задание 15.
Построить график функции в полярных координатах
1+0
.
8
sin
(13
θ
)
(
θ
∈
[0
,
2
π
]
) с помощью draw2d. Записать график в файл
g
_
f unct
_
6
.
Вариант решения.
(%i5) /* график функции в полярных координатах */
kill(all)$
load(draw)$
Кафедра математического и прикладного анализа, Тимошенко Ю.К.
17
fname:"C:/TEMP/g_funct_6"$
gpol:polar(1+0.8*sin(13*theta),theta,0,2*%pi)$
draw2d(
terminal=pdf, file_name=fname,
grid=true,dimensions = [1280,1024],
font="Arial", font_size=8,
nticks=800,
background_color=beige,
color=dark-orange,
line_width=6,
gpol
)$
-1.5
-1
-0.5
0
0.5
1
1.5
-1.5
-1
-0.5
0
0.5
1
1.5
Задание 16.
Построить график функции в полярных координатах
10
/θ
)
(
θ
∈
[1
,
10
π
]
) с помощью draw2d. Записать график в файл
g
_
f unct
_
7
.
Вариант решения.
10/theta,theta,1,10*
(%i4) /* график функции в полярных координатах */
kill(all)$
load(draw)$
fname:"C:/TEMP/g_funct_7"$
draw2d(
Кафедра математического и прикладного анализа, Тимошенко Ю.К.
18
terminal=pdf, file_name=fname,
dimensions = [1280,1024],
font="Arial", font_size=8,
user_preamble = "set grid polar",
nticks
= 800,
xrange
= [-5,5],
yrange
= [-5,5],
color
= navy,
background_color=beige,
line_width
= 6,
title
= "Hyperbolic Spiral",
polar(10/theta,theta,1,10*%pi)
)$
-4
-2
0
2
4
-4
-2
0
2
4
Hyperbolic Spiral
2.7.
Примеры вычисления экстремумов функций
2.8.
Примеры разложения функций в ряд Тейлора
2.9.
Примеры суммирования рядов с абсолютной и машинной точностью
2.10.
Задания для самостоятельного решения
Предметный указатель
Алгебра, 2
константа
числовая, 4
Mathematica, 2
19