Services & ResourcesWolfram ForumsMathGroup Archive

[Date Index] [Thread Index] [Author Index]

Re: finding the weighted degree of a polynomial

• To: mathgroup at smc.vnet.net
• Subject: [mg79728] Re: [mg79677] finding the weighted degree of a polynomial
• From: Sseziwa Mukasa <mukasa at jeol.com>
• Date: Thu, 2 Aug 2007 04:03:26 -0400 (EDT)
• References: <200708010913.FAA02044@smc.vnet.net>

On Aug 1, 2007, at 5:13 AM, Arnaud Dagnelies wrote:

>
> Let p(x,y) be a polynomial in x,y expressed in its expanded form, i.e.
> as a sum of terms as follows:
>
>  p(x,y) = sum   c_ij x^i y^j
>
> I want to find the (a,b)-weighted degree of this polynomial defined as
>
> wdeg(p, {a,b}) = max (ai + bj)   with c_ij != 0
>
> (where a and b are given fixed values)

Max[MapIndexed[If[#==0,0,a #2[[1]]+b #2[[2]]]&,CoefficientList[p, 
{x,y}],{2}]]

Regards,

Ssezi

• References:
  • finding the weighted degree of a polynomial
    • From: Arnaud Dagnelies <arnaud.dagnelies@gmail.com>