Pareto Plot

Author

Eric W. Weisstein
January 25, 2011

This notebook downloaded from http://mathworld.wolfram.com/notebooks/Statistics/ParetoPlot.nb.

For more information, see Eric's MathWorld entry http://mathworld.wolfram.com/ParetoPlot.html.

©2010 Wolfram Research, Inc. except for portions noted otherwise

Example

V5

<<Statistics`StatisticsPlots`

ParetoPlot[{{"Oats",34.3},{"Wheat",72.1},{"Rye",10.2},{"Soy",68.2}},
SymbolStyle->PointSize[.03],
SymbolShape->MakeSymbol[Point[{0,0}]],
PlotRange->All
]

V6

<<StatisticalPlots`

Bug:

ParetoPlot[{{"Oats",34.3},{"Wheat",72.1},{"Rye",10.2},{"Soy",68.2}},PerformanceGoal->"Speed"]

Workaround:

Block[{$PerformanceGoal="Speed"},ParetoPlot[{{"Oats",34.3},{"Wheat",72.1},{"Rye",10.2},{"Soy",68.2}}]]