Services & ResourcesWolfram ForumsMathGroup Archive

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

Re: Function for complex polynomial with variable number of arguments

• To: mathgroup at smc.vnet.net
• Subject: [mg123541] Re: Function for complex polynomial with variable number of arguments
• From: Christopher Young <cy56 at comcast.net>
• Date: Sat, 10 Dec 2011 07:31:16 -0500 (EST)
• Delivered-to: l-mathgroup@mail-archive0.wolfram.com
• References: <201112081021.FAA18802@smc.vnet.net> <CAEtRDScpfUeSx-BScsiPQBCsjJS-9cEx_CnTzgSgRo1v-HtmuA@mail.gmail.com>

Thanks, this looks like the way to do it when handing in an indefinite 
number of complex points.
Looks like I'll have to pass the points in as a list, though, if I want 
to also have a scaling constant.

On Dec 8, 2011, at 12:34 PM, Bob Hanlon wrote:

> Clear[poly]
>
> poly[z_, p___] := Times @@ (z - {p})
>
> poly[x + y I, a + b I, c + d I, c + d I]
>
> (-a - I*b + x + I*y)*(-c - I*d + x + I*y)^2
>
> poly[x + y I, a + b I]
>
> -a - I*b + x + I*y
>
> poly[x + y I, 0]
>
> x + I*y
>
> poly[x + y I]
>
> 1
>
> This last result comes from
>
> x + I*y - {}
>
> {}
>
> Times @@ {}
>
> 1
>
>
> Bob Hanlon

Chris Young
cy56 at comcast.net

• References:
  • Function for complex polynomial with variable number of arguments
    • From: Chris Young <cy56@comcast.net>