Creation and evaluation of polynomials

*To*: mathgroup at smc.vnet.net*Subject*: [mg89436] Creation and evaluation of polynomials*From*: jmgomezgoo at gmail.com*Date*: Mon, 9 Jun 2008 06:19:30 -0400 (EDT)

Hi! Image we have a function that create a Polynomial: polynomial[{1,0,0,0,1,0,1,}] -> p^5 + 3p^2 And we want to calulate roots and the derivate of this polynomial. I try with ToString[polynomial[{1,0,0,0,1,0,1}]] in order to use convert the polynomial expression to string first and later use ToExpression[] and calculate roots D[ToExpression[ToString[polynomial[{1,0,0,0,1,0,1}]], x] like the next examples: D[ToExpression["x^2+2x"], x] or NSolve[ToExpression["x^2+2x==x"], x] But ToString erase ^ symbol. Somebody knows how to solve it? Warm regards -jm

**Follow-Ups**:**Re: Creation and evaluation of polynomials***From:*"Szabolcs HorvÃt" <szhorvat@gmail.com>

**Re: Creation and evaluation of polynomials***From:*"W_Craig Carter" <ccarter@mit.edu>