Как нарисовать график в максимумах

Question

Я не знаю, как нарисовать график в максимумах, где мне нужно указать (например, точки должны быть видны на графике) локальные экстремумы и реальные корни. Я рассчитал их, но я не знаю, как реализовать это в графике. Это моя функция:

х ^ 6-7 * х ^ 5 + 7 * х ^ 4 + 35 * х ^ 3-56 * х ^ 2-28 * х + 48

realroots:

[x = -2, x = -1, x = 1, x = 2, x = 3, x = 4]

локальные экстремумы (x):

[х = -0,2111865524892743, х = -1,623405772994074, х = 1,457167417575563, х = 2,555696242823922, х = 3,655061998417197]

локальные экстремумы (у):

-58,02141996243023, +51,10292971871804, -8,27052172358404, +8,98628528970282, -26,13817267082878.

Заранее спасибо.

Answer 1

Чтобы ответить на вопрос в комментарии: «если бы я сделал это следующим образом: find_root (diff ((1/2) * (sin (5 * x) −x) ^ 2), x, -0.1,0.1); он возвращает мне -0.1, а если я поставлю его -0.3, он вернет -0.3 ".

Проблема в том, что вам нужно написать diff(..., x), а не просто diff(...) без второго аргумента x. Здесь я попробовал это:

(%i1) e:(1/2)*(sin(5*x)-x)^2;
                                       2  
                         (sin(5 x) - x)
(%o1)                    ---------------
                                2  
(%i2) e1:diff(e,x);
(%o2)            (5 cos(5 x) - 1) (sin(5 x) - x)
(%i3) find_root(e1, x, -0.1, 0.1);
(%o3)                          0.0
(%i4) find_root(e1, x, -0.3, -0.1);
(%o4)                 - 0.2738876812009132
(%i5) find_root(e1, x, 0.1, 0.3);
(%o5)                  0.2738876812009132