Дискуссионный математический форумМатематический форум
Математический форум Math Help Planet

Обсуждение и решение задач по математике, физике, химии, экономике

Теоретический раздел
Часовой пояс: UTC + 3 часа [ Летнее время ]
новый онлайн-сервис
число, сумма и дата прописью

Часовой пояс: UTC + 3 часа [ Летнее время ]




Начать новую тему Ответить на тему  [ Сообщений: 2 ] 
Автор Сообщение
 Заголовок сообщения: Подпись графиков
СообщениеДобавлено: 24 дек 2019, 00:17 
Не в сети
Начинающий
Зарегистрирован:
24 дек 2019, 00:16
Сообщений: 37
Cпасибо сказано: 7
Спасибо получено:
0 раз в 0 сообщении
Очков репутации: 1

Добавить очки репутацииУменьшить очки репутации
Доброго времени суток. Нужна помощь.
> M1 := 2*Pi*(Int(((Diff(W, I1))*(Diff(I1, psi))+(Diff(W, I2))*(Diff(I2, psi)))*r, r = 0 .. r[0])) = 2*Pi*(int((1/5)*mu*r^2*(psi-alpha[0]*sqrt(lambda))*(5*lambda+1)/lambda^2*r, r = 0 .. r[0]));
>mu := 1; r[0] := 1; M := unapply(evalf(rhs(M1)), psi, lambda, alpha[0])
>col := [red, blue, black, gray, yellow, cyan, green, orange, magenta, gold, khaki]; N := 10; alpha0 := .5
>i := 1;
for alpha from -alpha0 to alpha0 by 0.1 do
gMpsi[i] := plot(M(x, 1, alpha), x = -.5 .. .5, color=col[i], thickness=2);
i := i+1;
end do:
K := i-1;
>display([seq(gMpsi[i], i = 1 .. K)])
Получила 11 прямых. Мне нужно подписать каждую прямую alpha[0]=-0.5, alpha[0]=-0.4 ... alpha[0]=0.5. Как это сделать?

Вернуться к началу
 Профиль  
Cпасибо сказано 
 Заголовок сообщения: Re: Подпись графиков
СообщениеДобавлено: 16 фев 2020, 00:03 
Не в сети
Начинающий
Зарегистрирован:
14 фев 2020, 10:46
Сообщений: 49
Cпасибо сказано: 6
Спасибо получено:
18 раз в 16 сообщениях
Очков репутации: 0

Добавить очки репутацииУменьшить очки репутации
На вашем примере два способа подписать графики:
1. С помощью опции legend .
2. Используя команду plots:-textplot , подпись рядом с каждым графиком.

restart;
M1 := 2*Pi*(Int(((Diff(W, I1))*(Diff(I1, psi))+(Diff(W, I2))*(Diff(I2, psi)))*r, r = 0 .. r[0])) = 2*Pi*(int((1/5)*mu*r^2*(psi-alpha[0]*sqrt(lambda))*(5*lambda+1)/lambda^2*r, r = 0 .. r[0]));
mu := 1; r[0] := 1;
M := unapply(evalf(rhs(M1)), psi, lambda, alpha[0]);
col := [red, blue, black, gray, yellow, cyan, green, orange, magenta, gold, khaki];
N := 10; alpha0 := 0.5;
i := 1;
for alpha from -alpha0 to alpha0 by 0.1 do
gMpsi[i] := plot(M(x, 1, alpha), x = -.5 .. .5, color=col[i], thickness=2);
if type(i,odd) then t[i]:=[-0.55,M(-0.5,1,alpha),'alpha'[0]=alpha] else
t[i]:=[0.55,M(0.5,1,alpha),'alpha'[0]=alpha] fi;
i := i+1;
end do:
alpha:='alpha':
K := i-1;
T:=plots:-textplot([seq(t[i], i=1..K)]):
plots:-display([seq(gMpsi[i], i = 1 .. K)],legend=[seq(alpha[0]=r, r=-0.5..0.5,0.1)], size=[700,400]);
plots:-display(T, seq(gMpsi[i], i = 1 .. K), size=[880,400]);

Изображение

Изображение

Вернуться к началу
 Профиль  
Cпасибо сказано 
За это сообщение пользователю Kitonum "Спасибо" сказали:
Susanna Gaybaryan
Показать сообщения за:  Поле сортировки  
Начать новую тему Ответить на тему      Страница 1 из 1 [ Сообщений: 2 ]

 Похожие темы   Автор   Ответы   Просмотры   Последнее сообщение 
Построение графиков

в форуме MathCad

linelll

15

1149

04 мар 2012, 19:25

аппроксимация графиков

в форуме MathCad

Leno44ka

2

1293

05 май 2012, 17:06

Построение графиков

в форуме Начала анализа и Другие разделы школьной математики

alinochka

10

1798

12 июн 2014, 22:23

Построение графиков

в форуме Тригонометрия

351w

4

263

04 апр 2018, 13:36

Совмещение графиков

в форуме Microsoft Excel

linelll

1

835

05 апр 2012, 16:07

Анализ графиков

в форуме Пределы числовых последовательностей и функций, Исследования функций

alex1998109

0

103

12 дек 2016, 15:40

Построение графиков с модулем

в форуме Начала анализа и Другие разделы школьной математики

lllulll

2

710

29 окт 2013, 18:48

Анимация масива графиков

в форуме Maple

gimart

1

298

14 ноя 2015, 19:15

Точки пересечения графиков

в форуме Пределы числовых последовательностей и функций, Исследования функций

MAKSUS_87

1

290

07 апр 2014, 09:42

Построение нескольких графиков

в форуме MathCad

kivikivi_777

0

415

05 май 2014, 16:37


Часовой пояс: UTC + 3 часа [ Летнее время ]



Кто сейчас на конференции

Сейчас этот форум просматривают: нет зарегистрированных пользователей и гости: 1


Вы не можете начинать темы
Вы не можете отвечать на сообщения
Вы не можете редактировать свои сообщения
Вы не можете удалять свои сообщения
Вы не можете добавлять вложения

Найти:
Перейти:  

Яндекс.Метрика

Copyright © 2010-2020 MathHelpPlanet.com. All rights reserved