Deming's funnel: Difference between revisions
Content added Content deleted
(Updated D entry) |
SqrtNegInf (talk | contribs) m (→{{header|Perl 6}}: 'Z+' and 'X*' are non-associative, need parentheses) |
||
Line 301: | Line 301: | ||
=={{header|Perl 6}}== |
=={{header|Perl 6}}== |
||
{{Works with|rakudo|2015-11-04}} |
|||
<lang perl6>sub mean { @_ R/ [+] @_ } |
<lang perl6>sub mean { @_ R/ [+] @_ } |
||
sub stddev { |
sub stddev { |
||
Line 322: | Line 322: | ||
0.281 -0.749 -0.149 -2.436 -0.909 0.394 -0.113 -0.598 |
0.281 -0.749 -0.149 -2.436 -0.909 0.394 -0.113 -0.598 |
||
0.443 -0.521 -0.799 0.087 |
0.443 -0.521 -0.799 0.087 |
||
> Z+ 1i X* < |
> Z+ (1i X* < |
||
0.136 0.717 0.459 -0.225 1.392 0.385 0.121 -0.395 |
0.136 0.717 0.459 -0.225 1.392 0.385 0.121 -0.395 |
||
0.490 -0.682 -0.065 0.242 -0.288 0.658 0.459 0.000 |
0.490 -0.682 -0.065 0.242 -0.288 0.658 0.459 0.000 |
||
Line 336: | Line 336: | ||
1.537 -0.901 0.939 -0.411 0.341 -0.411 0.106 0.224 |
1.537 -0.901 0.939 -0.411 0.341 -0.411 0.106 0.224 |
||
-0.947 -1.424 -0.542 -1.032 |
-0.947 -1.424 -0.542 -1.032 |
||
>; |
>); |
||
constant @rule = |
constant @rule = |