Deming's funnel: Difference between revisions
m
→{{header|Mathematica}}
Line 896:
</pre>
=={{header|Mathematica}}/{{header|Wolfram Language}}==
<lang Mathematica>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,
0.161, 0.915, 2.08, -2.337, 0.034, -0.126, 0.014, 0.709,
Line 947 ⟶ 946:
];
TableForm[Results[#, Transpose[{dxs, dys}]] & /@ Range[4], TableSpacing -> 5]</lang>
{{out}}
<pre>Rule 1▼
▲Rule 1
mean: {0.0004,0.07023}
std dev: {0.715271,0.646206}
Line 967 ⟶ 962:
Rule 4
mean: {3.13412,5.42102}
std dev: {1.58739,3.93036}</pre>
== Stretch 1 ==
| |||