このパッケージの機能は,組込みの Mathematica カーネルに加わった.
Modeの代りにカーネル関数Commonestが使われるようになった.
CentralMoment,GeometricMean,HarmonicMean,InterquartileRange,Kurtosis,MeanDeviation,MedianDeviation,QuartileDeviation,Quartiles,QuartileSkewness,RootMeanSquare,Skewness,TrimmedMeanは組込みの Mathematica カーネルの一部になった.
Version 5.2
GeometricMean[{10, 50, 10, 15, 20}]Modeの代りにCommonestが使われるようになった:
Version 5.2
Commonest[{10, 50, 10, 15, 20}][[1]]CoefficientOfVariationはMeanとStandardDeviationを使って計算することができる:
Version 5.2
CoefficientOfVariation[data_] := StandardDeviation[data] / Mean[data]CoefficientOfVariation[{10, 50, 10, 15, 20}]ExpectedValueはMeanを使って計算することができる:
Version 5.2
Mean[Sqrt[Range[1., 10.]]]SampleRangeはMinとMaxを使って計算することができる:
Version 5.2
SampleRange[data_] := {Min[data], Max[data]}SampleRange[{10, 50, 10, 15, 20}]KurtosisExcessはKurtosisから計算することができる:
Version 5.2
Kurtosis[{10, 50, 10, 15, 20}] - 3ZeroMeanはデータから平均を引くことで計算することができる:
Version 5.2
ZeroMean[data_] := data - Mean[data]ZeroMean[{10, 50, 10, 15, 20}]StandardizeはMeanおよびStandardDeviationから計算することができる:
Version 5.2
Options[StandardizeMLE] = {MLE -> False};
StandardizeMLE[L_, s___ ? OptionQ] := Module[{sk},
sk = If[!TrueQ[MLE /. Flatten@{s, Options[StandardizeMLE]}],
1,
Sqrt[Length@L / (Length@L - 1)]];
sk(L - Mean@L) / StandardDeviation@L
]
StandardizeMLE[Range[1., 10.], MLE -> True]InterpolatedQuantileは,パラメータ化されたQuantileとして計算することができる:
Version 5.2
Quantile[{10, 50, 10, 15, 20}, 3 / 4, {{1 / 2, 0}, {0, 1}}]LocationReport,DispersionReport,ShapeReportはレポートの要素から直接構築することができる:
Version 5.2
LocationReport[data_] := {Mean -> Mean[data], HarmonicMean -> HarmonicMean[data], Median -> Median[data]}LocationReport[{10, 50, 10, 15, 20}]別の標準偏差および分散は,StandardDeviationとVarianceから計算することができる:
Version 5.2
StandardDeviationMLE[data_] := StandardDeviation[data]Sqrt[(Length[data] - 1) / Length[data]]StandardDeviationMLE[{10, 50, 10, 15, 20}]
Version 5.2
VarianceMLE[data_] := Variance[data](Length[data] - 1) / Length[data]VarianceMLE[{10, 50, 10, 15, 20}]
Version 5.2
StandardErrorOfSampleMean[data_] := StandardDeviation[data] / Sqrt[Length[data]]StandardErrorOfSampleMean[{10, 50, 10, 15, 20}]
Version 5.2
VarianceOfMean[data_] := Variance[data] / Length[data]VarianceOfMean[{10, 50, 10, 15, 20}]
Version 5.2
PearsonSkewness1[data_] := 3(Mean[data] - Commonest[data][[1]]) / StandardDeviation[data]PearsonSkewness1[{10, 50, 10, 15, 20}]
Version 5.2
PearsonSkewness2[data_] := 3(Mean[data] - Median[data]) / StandardDeviation[data]PearsonSkewness2[{10, 50, 10, 15, 20}]