Polynomial regression: Difference between revisions
Content added Content deleted
m (→{{header|FreeBASIC}}: removed a empty lines) |
No edit summary |
||
Line 376: | Line 376: | ||
Console.ReadKey(true); |
Console.ReadKey(true); |
||
}</lang> |
}</lang> |
||
=={{header|Emacs Lisp}}== |
|||
Simple solution by Emacs Lisp and built-in Emacs Calc. |
|||
<lang emacs-lisp> |
|||
(setq x '[0 1 2 3 4 5 6 7 8 9 10]) |
|||
(setq y '[1 6 17 34 57 86 121 162 209 262 321]) |
|||
(calc-eval |
|||
(format "fit(a*x^2+b*x+c,[x],[a,b,c],[%s %s])" x y)) |
|||
</lang> |
|||
{{out}} |
|||
<pre> |
|||
"3. x^2 + 1.99999999996 x + 1.00000000006" |
|||
</pre> |
|||
=={{header|Fortran}}== |
=={{header|Fortran}}== |