Polynomial regression: Difference between revisions
Content added Content deleted
(→{{header|Perl}}: added PDL version) |
m (→{{header|Perl}}: missing newline (was outputting "const 1.000X 2.000X**2 3.000")) |
||
Line 1,317: | Line 1,317: | ||
my @coeff = $reg->theta(); |
my @coeff = $reg->theta(); |
||
printf "%-6s %8.3f", $model[$_], $coeff[$_] for 0..@model-1;</lang> |
printf "%-6s %8.3f\n", $model[$_], $coeff[$_] for 0..@model-1;</lang> |
||
{{output}} |
{{output}} |
||
<pre>const 1.000 |
<pre>const 1.000 |