Re: Trigonometric math functions
- To: mathgroup at smc.vnet.net
- Subject: [mg44584] Re: Trigonometric math functions
- From: drbob at bigfoot.com (Bobby R. Treat)
- Date: Sat, 15 Nov 2003 02:05:13 -0500 (EST)
- References: <boig47$og2$1@smc.vnet.net>
- Sender: owner-wri-mathgroup at wolfram.com
You can get a very good rational function approximation as follows:
<< Calculus`Pade`
<< Graphics`Colors`
pade = Pade[ArcCos[x], {x, 0, 6, 6}] // Simplify
series = Normal@Series[ArcCos[x], {x, 0, 19}]
Plot[{pade, series} - ArcCos[x] // Evaluate, {x, 0, 1}, PlotStyle -> {Red,
Blue}]
The Pade approximation of order {6,6} looks better than the series of order 19.
Bobby
"Bruno" <bpa at BPASoftware.com> wrote in message news:<boig47$og2$1 at smc.vnet.net>...
> Hi all,
>
> I would like to implement an arc cos function on a 16 bits µcontroller
> (optimized sin() and cos() function are welcome).
>
> Does someone have some sources or an algorythm in this way ?
>
> Thanks in advance,
>
> Regards.