[Maxima] newbie simple question

[Barton Willis]

Maybe a function something like

(%i12) f(p,x) := block([k],
   p : ratexpand(p),
   k : hipow(p,x),
   while (k > 0) do (
    p : ratsubst(subvar(m,k),x^k,p),
    k : k - 1),
   p)$

will work for you:

(%i14) f(2 + x + 5 * x^2 - x^8,x);
(%o14) -m[8]+5*m[2]+m[1]+2

Barton

-----maxima-bounces at math.utexas.edu wrote: -----


>Dear list members:
>I have a polynomial in "x" (e.g. a0+a1 x + a2 x^2 + ... ar x^r)
>and want to substitute "x^i", where "i" ranges from 1 to r by m[i].
>I understant I can use subst() and do it term by term, but I need to do
>that for several polynomials and not all of them are of the same degree.
>
>Any idea how to do that ?
>Many thanks.
>Paulo
>
>
>
>Paulo Gustavo Grahl, CFA
>------------------------------------------
>pgrahl at gmail.com
>pgrahl at fgvmail.br
>
>+55(21) 8809-9254
>www.linkedin.com/in/pgrahl
>------------------------------------------
>
>
>_______________________________________________
>Maxima mailing list
>Maxima at math.utexas.edu
>http://www.math.utexas.edu/mailman/listinfo/maxima