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