ハウツー 9 ステップを1つのセッション内で順に実行します。各ステップはエンジンで実行済みで、以下の出力は実際に生成されたものです。
p = x ^ 2 E ^ (2x) + 2x E ^ (2x) + x E ^ xE^x*x + 2*E^(2*x)*x + E^(2*x)*x^2Collect[p, x]E^x + 2*E^(2*x) + E^(2*x)*xCollect[p, E ^ _]Collect[E^x*x + 2*E^(2*x)*x + E^(2*x)*x^2, E^(_)]Collect[p, E ^ _, Simplify]Collect[E^x*x + 2*E^(2*x)*x + E^(2*x)*x^2, E^(_), Simplify]poly = x ^ 2 - 3x + 22 - 3*x + x^2Coefficient[poly, x, 0]2poly /. x -> 02MonomialList[poly, x]{x^2, -3*x, 2}poly//TraditionalFormTraditionalForm[2 - 3*x + x^2]