Re: Generate polynomial of specified degree

*To*: mathgroup at smc.vnet.net*Subject*: [mg60643] Re: [mg60618] Generate polynomial of specified degree*From*: Bob Hanlon <hanlonr at cox.net>*Date*: Fri, 23 Sep 2005 04:19:46 -0400 (EDT)*Reply-to*: hanlonr at cox.net*Sender*: owner-wri-mathgroup at wolfram.com

f[n_Integer?NonNegative,x_Symbol:x]:= ToExpression[CharacterRange["a", FromCharacterCode[97+n]]]. x^Range[n,0,-1] Table[f[n],{n,0,3}] {a, b + a*x, a*x^2 + b*x + c, a*x^3 + b*x^2 + c*x + d} Bob Hanlon > > From: Renan <renan.birck at gmail.com> To: mathgroup at smc.vnet.net > Date: 2005/09/22 Thu AM 02:08:12 EDT > Subject: [mg60643] [mg60618] Generate polynomial of specified degree > > Hello, > > Sorry if this may seem a silly question, but I readed the Mathematica > help and found no references. > > Is there any function that can generate a polynomial of a given degree? > > e.g. > > For degree 1, f[x] would return a x + b > For degree 2, f[x] would return a x^2 + b x + c (quadratic equation) > For degree 3, f[x] would return a x^3 + b x^2 + c x + d (quadratic equation) > > Thanks, > Renan - Canoas, RS, Brazil > >