On 9/24/07, Dan Weston <westondan@imageworks.com> wrote:

On pourrait toujours procéder à partir de:

p ys xs x = zipWith (*) ys . map (flip ($)) x $ ls
where ls = ... x .. xs ..

mais avant de coder un algorithme inférieur, je cite:

Conte and de Boor, "Elementary Numerical Analysis, An Algorithmic
Approach", p. 40:

"In such a process, use of the Lagrange form seems wasteful since, in
calculating p_x(x), no obvious advantage can be taken of the fact that
one already has p_k-1(x) available. For this purpose and others, the
Newton form of the interpolating polynomial is much better suited."

La forme Newton (qui utilise les différences divisées) est beaucoup
préférable à celle de Lagrange pour évaluer les polynômes de Lagrange
(tu peux la googler plus facilement que je puisse la décrire ici).

Dan Weston

Dupont Corentin wrote:
> Salut,
> récemment j'ai implémenté avec difficulté les polynômes de Lagrange en
> Haskell.
> Je pense que je passe à coté d'une écriture beaucoup plus élégante...
> Comment l'écririez-vous, avec la fameuse notation point-free??
>
> Voici l'équation en annexe...
>
> a+
> Corentin
>
>
> ------------------------------------------------------------------------
>
>
> ------------------------------------------------------------------------
>
> _______________________________________________
> Haskell-fr mailing list
> Haskell-fr@haskell.org
> http://www.haskell.org/mailman/listinfo/haskell-fr

_______________________________________________
Haskell-fr mailing list
Haskell-fr@haskell.org
http://www.haskell.org/mailman/listinfo/haskell-fr