Иллюстрированный самоучитель по Mathematica 3/4

Раскрытие и расширение выражений (функции класса Expand)

Расширение, или раскрытие, выражений – еще одна типовая операция компьютерной алгебры. По смыслу она противоположна упрощению выражений. Часто компактная форма представления выражений обусловлена определенными операциями по их упрощению. Существует множество выражений, для которых эти правила известны. Например, мы знаем, что выражение (а -b)2 = (а -b) (а -b) можно представить как a2-2ab + b2.

Разумеется, такое соответствие существует далеко не всегда. К примеру, выражение в виде числа 1 вовсе не является представлением только выражения sin(X)2 + cos(x)2.

Ниже представлены основные функции, производящие раскрытие и расширение выражений:

  • ComplexExpand[expr] – раскрывает ехрг, полагая все переменные вещественными;
  • ComplexExpand [expr, {x1, х2,…}] – раскрывает ехрг, считая переменные xi комплексными;
  • FunctionExpand [expr] – раскрывает выражения ехрг, содержащие специальные функции;
  • Expand [ехрг ] – раскрывает произведения и положительные целые степени в ехрг;
  • Expand [expr, patt] – выполняет расширение только для тех элементов ехрг, которые содержат соответствующие шаблону patt члены;
  • Exp_andAll [expr] – раскрывает все произведения и целочисленные степени в любой части ехрг;
  • ExpandAll [expr, patt] – исключает из операции расширения те части ехрг, которые не содержат соответствующие шаблону patt члены;
  • ExpandDenominator [expr] – раскрывает произведение и степени, которые присутствуют в выражении ехрг в роли знаменателей;
  • ExpandNumerator [expr] – раскрывает произведения и степени в числителе выражения ехрг;
  • PowerExpand[expr] – раскрывает вложенные степени, степени произведений, логарифмы от степеней и логарифмы от произведений. Осторожно используйте PowerExpand, так как эта функция не реагирует на разрывный характер выражения ехрг.

Приведем примеры операций расширения выражений с помощью функции Expand:

Expand[(x -a)*(x -b)*(x -c)]
-abc+ abx + acx+bcx-ax2 -bx2-cx2 + x3
  
Simplify[%]
-(a-x) (-b+x) (-c + x)
  
Expand!(Sin[x]+Cos[x])/(Cos[x]*Sin[x])]
Csc[x] + Secfx]
  
Simplify[%]
Sirrplfy[Csc[x] + Sec[x] ]
  
Expand[2*Cos[x]^2,Trig > True]
2Cos[x]2
  
Simplify[%]
1+Cos[2x]
  
Expand[Sin[x]^2+Cos[x]^2]
Cos[y]2+Sin[x]2
  
Expand[Sin[x]^2+Cos[x]^2,Trig > True]
1-Cos[x]2/2 +Cos [y]2/2 +Sin[x]2/2 -Sin[y]2/2
  
Simplify[%]
1/2 (2-Cos[2x] + Cos[2y])

В этих примерах полезно обратить внимание на то, что далеко не всегда последовательное применение функций Expand и Simplify дает исходное выражение. Гораздо чаще получается новое выражение, порой представляющее ценность. При операциях с тригонометрическими выражениями нередко нужно использовать опцию Trig › True, намечая тригонометрический путь решения. В противном случае может быть просто выдан отказ от выполнения операции Expand с заданным выражением, которое будет просто повторено в ячейке вывода.

Приведем примеры использования других функций расширения выражений:

ExpandAll[Sin[2*Cos[x]], Trig > True]
Cos [Cos [x] + ISin[x] ] Sin[Cos[x] -ISin[x] ] +
Cos [Costx] -ISintx] ] Sin[Cos[x] + ISin[x] ] Simplify[%]
Sin [ 2 Cos [x]]
  
ExpandNumerator[(1 + x)^2/x]
1 + 2 x + x2/x
  
ExpandDenominator[(1 -x)^2/(l + x)^2]
(1-x)2/1 + 2 x + x2
  
ComplexExpand[Sin[a + I*b]]
Cosh[b] Sin [a] + I Cos [a] Sirihfb]
  
ComplexExpand[ (a. + b I) / (x + d I) ]
-lad/Abs[Id+x]2+bd/Abs[Id+x]2 + ax/Abs[Id + x]2 +Ibx/Abs[Id+x]2
  
Simplify[%]
(-Ia + b) (d + Ix)/^bstld+x]2
  
PowerExpand[Sqrt[a^2*b*c]]
aSQRT(b)SQRT(c)
  
FunctionExpand[Gamma[4, x]]
E-xx3+ 3 (Fxx2+ 2 (E-x+ E-xx))
  
FunctionExpand[Beta[4, 2 + x]]
6/(2 + x) (3+x) (4 + x) (5 + x)
  
FunctionExpand[Zeta[3, 2 + x] ]

Разумеется, этими примерами далеко не исчерпываются возможности данной группы функций. Рекомендуется опробовать примеры из справочной системы данных Mathematica и свои собственные примеры.

Если Вы заметили ошибку, выделите, пожалуйста, необходимый текст и нажмите CTRL + Enter, чтобы сообщить об этом редактору.