Deming's funnel: Difference between revisions
Content added Content deleted
| Line 896: | Line 896: | ||
</pre> |
</pre> |
||
=={{header|Mathematica}}== |
=={{header|Mathematica}}/{{header|Wolfram Language}}== |
||
<lang Mathematica> |
<lang Mathematica>dxs = {-0.533, 0.27, 0.859, -0.043, -0.205, -0.127, -0.071, 0.275, |
||
dxs = {-0.533, 0.27, 0.859, -0.043, -0.205, -0.127, -0.071, 0.275, |
|||
1.251, -0.231, -0.401, 0.269, 0.491, 0.951, 1.15, 0.001, -0.382, |
1.251, -0.231, -0.401, 0.269, 0.491, 0.951, 1.15, 0.001, -0.382, |
||
0.161, 0.915, 2.08, -2.337, 0.034, -0.126, 0.014, 0.709, |
0.161, 0.915, 2.08, -2.337, 0.034, -0.126, 0.014, 0.709, |
||
| Line 947: | Line 946: | ||
]; |
]; |
||
TableForm[Results[#, Transpose[{dxs, dys}]] & /@ Range[4], TableSpacing -> 5] |
TableForm[Results[#, Transpose[{dxs, dys}]] & /@ Range[4], TableSpacing -> 5]</lang> |
||
</lang> |
|||
{{out}} |
{{out}} |
||
| ⚫ | |||
<pre> |
|||
| ⚫ | |||
mean: {0.0004,0.07023} |
mean: {0.0004,0.07023} |
||
std dev: {0.715271,0.646206} |
std dev: {0.715271,0.646206} |
||
| Line 967: | Line 962: | ||
Rule 4 |
Rule 4 |
||
mean: {3.13412,5.42102} |
mean: {3.13412,5.42102} |
||
std dev: {1.58739,3.93036} |
std dev: {1.58739,3.93036}</pre> |
||
</pre> |
|||
== Stretch 1 == |
== Stretch 1 == |
||