[rand.dist.samp.pconst] plus some bug fixes in the tests of the other distributions
git-svn-id: https://llvm.org/svn/llvm-project/libcxx/trunk@104224 91177308-0d34-0410-b5e6-96231b3b80d8
This commit is contained in:
@@ -61,10 +61,10 @@ int main()
|
||||
double x_var = p.p()*(1-p.p());
|
||||
double x_skew = (1 - 2 * p.p())/std::sqrt(x_var);
|
||||
double x_kurtosis = (6 * sqr(p.p()) - 6 * p.p() + 1)/x_var;
|
||||
assert(std::abs(mean - x_mean) / x_mean < 0.01);
|
||||
assert(std::abs(var - x_var) / x_var < 0.01);
|
||||
assert(std::abs(skew - x_skew) / x_skew < 0.01);
|
||||
assert(std::abs(kurtosis - x_kurtosis) / x_kurtosis < 0.01);
|
||||
assert(std::abs((mean - x_mean) / x_mean) < 0.01);
|
||||
assert(std::abs((var - x_var) / x_var) < 0.01);
|
||||
assert(std::abs((skew - x_skew) / x_skew) < 0.01);
|
||||
assert(std::abs((kurtosis - x_kurtosis) / x_kurtosis) < 0.02);
|
||||
}
|
||||
{
|
||||
typedef std::bernoulli_distribution D;
|
||||
@@ -99,9 +99,9 @@ int main()
|
||||
double x_var = p.p()*(1-p.p());
|
||||
double x_skew = (1 - 2 * p.p())/std::sqrt(x_var);
|
||||
double x_kurtosis = (6 * sqr(p.p()) - 6 * p.p() + 1)/x_var;
|
||||
assert(std::abs(mean - x_mean) / x_mean < 0.01);
|
||||
assert(std::abs(var - x_var) / x_var < 0.01);
|
||||
assert(std::abs(skew - x_skew) / x_skew < 0.01);
|
||||
assert(std::abs(kurtosis - x_kurtosis) / x_kurtosis < 0.01);
|
||||
assert(std::abs((mean - x_mean) / x_mean) < 0.01);
|
||||
assert(std::abs((var - x_var) / x_var) < 0.01);
|
||||
assert(std::abs((skew - x_skew) / x_skew) < 0.01);
|
||||
assert(std::abs((kurtosis - x_kurtosis) / x_kurtosis) < 0.02);
|
||||
}
|
||||
}
|
||||
|
||||
Reference in New Issue
Block a user