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

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

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

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




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

Добавить очки репутацииУменьшить очки репутации
Доброго времени суток)
помогите, пожалуйста, построить график [math]\lambda[/math] = [math]\lambda[/math] ( [math]\alpha 0[/math] ), когда P( [math]\lambda[/math] , [math]\alpha 0[/math] )=0
> restart;
with(plots);

> W := (1/2)*mu*(I[1]-3+1/5*(I[2]-3));
> I1 := 2/lambda+lambda^2+(psi/lambda^(1/2)-alpha[0])^2*r^2;
I2 := 2*lambda+1/lambda^2+(psi/lambda^(1/2)-alpha[0])^2*r^2/lambda;

> P := unapply(evalf(simplify(2*Pi*(int(((diff(W, I[1]))*(diff(I1, lambda))+(diff(W, I[2]))*(diff(I2, lambda)))*r, r = 0 .. r[0])))), lambda, psi, alpha[0]);

> M := unapply(evalf(simplify(2*Pi*(int(((diff(W, I[1]))*(diff(I1, psi))+(diff(W, I[2]))*(diff(I2, psi)))*r, r = 0 .. r[0])))), lambda, psi, alpha[0]);

> mu := 1; r[0] := 1;
>
> i := 1;
for x from 0 to 10 by 2 do
gPlambda[i] := plot(P(lambda, 0, x), lambda = .8 .. 2, thickness = 2);
LegendPlambda[i] := textplot([.63, P(.8, 0, x)-0.8e-1, alpha[0] = x], align = {above, right});
i := i+1 end do;
K := i-1;
> display([seq(gPlambda[i], i = 1 .. K), seq(LegendPlambda[i], i = 1 .. K)], textplot([2, -3, lambda]), textplot([.65, P(2, 0, 2), P]), view = [.6 .. 2.1, P(.8, 0, 10) .. P(2, 0, 0)]);

Вернуться к началу
 Профиль  
Cпасибо сказано 
 Заголовок сообщения: Re: Построение графика
СообщениеДобавлено: 24 фев 2020, 19:32 
Не в сети
Продвинутый
Зарегистрирован:
14 фев 2020, 10:46
Сообщений: 97
Cпасибо сказано: 12
Спасибо получено:
44 раз в 40 сообщениях
Очков репутации: 27

Добавить очки репутацииУменьшить очки репутации
Сразу замечу, что лучше не использовать переменные с именами I[1] и I[2] , так как I это защищённая константа в Maple (мнимая единица). Вы же не используете имена, наподобие 1[1] или 1[2] . Поэтому я заменил I[1] и I[2] на J[1] и J[2] .

Ваша проблема легко решается командой plots:-implicitplot (построение неявно заданных функций). Вы уже имеете функцию P( λ , psi, α0) , нужно только указать значение psi . Я взял psi=0 .

restart;
with(plots):

W := (1/2)*mu*(J[1]-3+1/5*(J[2]-3)):
I1 := 2/lambda+lambda^2+(psi/lambda^(1/2)-alpha[0])^2*r^2:
I2 := 2*lambda+1/lambda^2+(psi/lambda^(1/2)-alpha[0])^2*r^2/lambda:

P := unapply(evalf(simplify(2*Pi*(int(((diff(W, J[1]))*(diff(I1, lambda))+(diff(W, J[2]))*(diff(I2, lambda)))*r, r = 0 .. r[0])))), lambda, psi, alpha[0]);
mu := 1: r[0] := 1:
implicitplot(P(lambda,0,alpha[0])=0,alpha[0]=0..2,lambda=-5..5, color=red,thickness=3, gridrefine=3);

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

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

в форуме Информатика и Компьютерные науки

[Rita]

4

355

19 май 2019, 22:25

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

в форуме MathCad

VladKalancha

0

548

17 май 2015, 13:07

Исследование графика и его построение

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

kill_FF

3

339

20 дек 2014, 00:38

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

в форуме Аналитическая геометрия и Векторная алгебра

daria596

5

478

21 янв 2017, 12:30

Построение графика первой производной

в форуме Дифференциальное исчисление

gadf007

7

601

21 дек 2016, 18:29

Обратные функции, построение графика

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

351w

25

1088

06 апр 2018, 12:48

Исследование функции и построение графика

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

SheLdeR_856

1

371

02 май 2018, 20:56

Построение трехмерного графика (мат. моделирование)

в форуме Векторный анализ и Теория поля

Aspromist

5

437

27 апр 2016, 09:35

Исследование функции и построение графика

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

AnastasyaShved

1

312

13 дек 2015, 17:50

Построение графика с помощью slider

в форуме Maple

777777

1

368

14 май 2015, 19:11


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



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

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


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

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

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

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