author | francesco-ST <francesco.abbate@st.com> | 2011年02月09日 14:12:08 +0100 |
---|---|---|
committer | francesco-ST <francesco.abbate@st.com> | 2011年02月09日 14:12:08 +0100 |
commit | 7b42e27a13e86b32e0ad1a86cdb05ba93993b45d (patch) | |
tree | 82cc5ad66f863ee9e97b9c6dc7c2a366e570121e /examples/linfit.lua | |
parent | 94bc532ac06039825456a1645b5aa754fe447ff0 (diff) | |
download | gsl-shell-7b42e27a13e86b32e0ad1a86cdb05ba93993b45d.tar.gz |
-rw-r--r-- | examples/linfit.lua | 2 |
diff --git a/examples/linfit.lua b/examples/linfit.lua index 2e1a61aa..6079b661 100644 --- a/examples/linfit.lua +++ b/examples/linfit.lua @@ -54,7 +54,7 @@ function demo3() local legmodel = |j, x| j == 0 and 1 or legendreP(j, xn(x)) local X = new(n, kfit+1, |i,j| legmodel(j-1, x[i])) local c = mlinear(X, y) - local yfit = mul(X, c) + local yfit = X * c p = plot('Legendre Polinomial fit of Bessel J3(x)') p:addline(xyline(x, yfit)) p:addline(xyline(x, y), 'blue', {{'marker', size=5}}) |