Services & Resources / Wolfram Forums
-----
 /
MathGroup Archive
2007
*January
*February
*March
*April
*May
*June
*July
*August
*September
*October
*Archive Index
*Ask about this page
*Print this page
*Give us feedback
*Sign up for the Wolfram Insider

MathGroup Archive 2007

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

Search the Archive

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


  • Prev by Date: Plot a number line
  • Next by Date: Re: RegionPlot3D & MaxRecursion
  • Previous by thread: Re: finding the weighted degree of a polynomial
  • Next by thread: Re: finding the weighted degree of a polynomial