Работа в Matematica 7.0 для начинающих

[Dlacier]

Действительно)))
Для этого нужно сначала "вызвать" эту команду, то есть набрать
Needs["PlotLegends`"]
Затем, как обычно:

\( a=26.8; \)
\( R=173; \)
\( Plot[\{\frac{a^2}{(a^2+u^2)^2}, \frac{1}{R^2}\},\{u,-75,75\}, AxesLabel -> \{u,
  k\}, PlotStyle -> Thick,  \)
\( PlotLegend ->\{"\frac{a^2}{(a^2+u^2)^2}","\frac{1}{R^2}"\}, LegendPosition -> \{0.5, -0.3\}] \)
где
\( LegendPosition  \) координаты надписей.
См. Рис.))

[glora]

Как одновременно задать цвет линии графика и ее толщину?
Если пишу \( PlotStyle->{Thick}  \), то \( PlotStyle->{Red}  \) не воспринимается и наоборот.

[Dlacier]

Нужно так

\( PlotStyle -> Directive[Red, Thick] \)