.
T={-1,-4,1};
.
R[[1]]
-35
3.6.3
.
.
<<Algebra`SymmetricPolynomials`
.
T={1,-2,-3,1};
R[[1]]
3.6.4. , . .
.
.
T=Table[Coefficient[f[x],x,6-n],{n,2,6}];
<<Algebra`SymmetricPolynomials`
.
- ( - ). , - , - . - : ,
.
:
.
. , . , (3.6.2) . , , ( , ) . (3.6.2), . . , :
.
).
, .
3.6.5. -
.
.
f[x_]=x^2-5*x+3;
g[x_]=x^2+7*x+1;
u[x_]=x^3+7*x^2+3*x+1;
f[x]
.
<<Algebra`SymmetricPolynomials`
a=R1[[1]]/.R;
R3=Expand[R3/.R];