Deming's funnel: Difference between revisions
Content added Content deleted
(Mathematica section,"Stretch 1" and "Stretch 2" change section level to subsection level.) |
|||
Line 1,381: | Line 1,381: | ||
std dev: {1.58739,3.93036}</pre> |
std dev: {1.58739,3.93036}</pre> |
||
== Stretch 1 == |
=== Stretch 1 === |
||
<syntaxhighlight lang="mathematica"> |
<syntaxhighlight lang="mathematica"> |
||
RadiusDistribution = NormalDistribution[0, 1]; |
RadiusDistribution = NormalDistribution[0, 1]; |
||
Line 1,418: | Line 1,418: | ||
== Stretch 2 == |
=== Stretch 2 === |
||
<syntaxhighlight lang="mathematica"> |
<syntaxhighlight lang="mathematica"> |
||
ListPlot[MarblePositions[#][Transpose[{dxs,dys}]]&/@Range[4],PlotLegends->PointLegend[{1,2,3,4}],AspectRatio->Automatic,ImageSize->600] |
ListPlot[MarblePositions[#][Transpose[{dxs,dys}]]&/@Range[4],PlotLegends->PointLegend[{1,2,3,4}],AspectRatio->Automatic,ImageSize->600] |