1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
|
// Copyright John Maddock 2007.
// Use, modification and distribution are subject to the
// Boost Software License, Version 1.0. (See accompanying file
// LICENSE_1_0.txt or copy at http://www.boost.org/LICENSE_1_0.txt)
// Note that this file contains quickbook mark-up as well as code
// and comments, don't change any of the special comment mark-ups!
#include <iostream>
//[policy_eg_7
#include <boost/math/distributions.hpp>
namespace {
using namespace boost::math::policies;
typedef policy<
// return infinity and set errno rather than throw:
overflow_error<errno_on_error>,
// Don't promote double -> long double internally:
promote_double<false>,
// Return the closest integer result for discrete quantiles:
discrete_quantile<integer_round_nearest>
> my_policy;
BOOST_MATH_DECLARE_DISTRIBUTIONS(double, my_policy)
} // close namespace my_namespace
int main()
{
//
// Start with something we know will overflow:
//
normal norm(10, 2);
errno = 0;
std::cout << "Result of quantile(norm, 0) is: "
<< quantile(norm, 0) << std::endl;
std::cout << "errno = " << errno << std::endl;
errno = 0;
std::cout << "Result of quantile(norm, 1) is: "
<< quantile(norm, 1) << std::endl;
std::cout << "errno = " << errno << std::endl;
//
// Now try a discrete distribution:
//
binomial binom(20, 0.25);
std::cout << "Result of quantile(binom, 0.05) is: "
<< quantile(binom, 0.05) << std::endl;
std::cout << "Result of quantile(complement(binom, 0.05)) is: "
<< quantile(complement(binom, 0.05)) << std::endl;
}
//] ends quickbook imported section
|
