Mathematica 9 is now available
Services & Resources / Wolfram Forums
-----
 /
MathGroup Archive
2005
*January
*February
*March
*April
*May
*June
*July
*August
*September
*October
*November
*December
*Archive Index
*Ask about this page
*Print this page
*Give us feedback
*Sign up for the Wolfram Insider

MathGroup Archive 2005

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

Search the Archive

Re: Why won't Horner[] work?

  • To: mathgroup at smc.vnet.net
  • Subject: [mg59021] Re: Why won't Horner[] work?
  • From: Peter Pein <petsie at dordos.net>
  • Date: Wed, 27 Jul 2005 01:24:42 -0400 (EDT)
  • References: <dc4r39$i9$1@smc.vnet.net>
  • Sender: owner-wri-mathgroup at wolfram.com

Paul McHale schrieb:
> When I issue the command:
> 
> In:= Fit[ {{1,200},{200,0},{400,200}}, {1,x,x^2}, x]
> 
> Out:= 202.01 - 2.01508 x + 0.00502513 x^2
> 
> This seems good.  But when I do
> 
> 
> In:= Horner[Fit[ {{1,200},{200,0},{400,200}}, {1,x,x^2}, x]]
> 
> Out:= Horner[202.01 - 2.01508 x + 0.00502513 x^2]
> 
> 
> Why doesn't it evaluate the polynomial?  To I need to convert the
> output of fit?
> 
> Thanks,
> Paul
> 
In[1]:=
<< "Algebra`Horner`"
Horner[Fit[{{1, 200}, {200, 0}, {400, 200}}, {1, x, x^2}, x]]
Out[2]=
202.01005025125627 + (-2.0150753768844227 + 0.005025125628140706*x)*x

looks OK, doesn't it?

-- 
Peter Pein
Berlin


  • Prev by Date: Visualization site updates - game theory and magnetic fields
  • Next by Date: Re: Freeware Mathematica packages(don't know the exact term)
  • Previous by thread: Re: Why won't Horner[] work?
  • Next by thread: Re: Why won't Horner[] work?