如何在操作中输入多项式

Question

有什么方法可以在 Wolfram Mathematica 中输入多项式吗？

我试试这个：

Manipulate[Plot[a, {x, -6, 6}, ImageSize -> 400],{{a, -3 x - 2 x^2 + x^3, "Polynomial"}}]

如果我不以 cdf 格式保存它，它就可以工作。有谁知道如何修复它以便当我以 cdf 格式保存它时它可以工作？

Answer 1

也许这样就可以了

Manipulate[ Plot[#, {x, 0, 1}, PlotLabel -> #
    ] &@Total@
   MapIndexed[# x^(First@#2 - 1) &, coef ], {{coef, {0, 1}}}]

How to input polynomial in manipulate