diff options
Diffstat (limited to 'src/boost/libs/accumulators/test/rolling_variance.cpp')
-rw-r--r-- | src/boost/libs/accumulators/test/rolling_variance.cpp | 208 |
1 files changed, 208 insertions, 0 deletions
diff --git a/src/boost/libs/accumulators/test/rolling_variance.cpp b/src/boost/libs/accumulators/test/rolling_variance.cpp new file mode 100644 index 00000000..d7f00759 --- /dev/null +++ b/src/boost/libs/accumulators/test/rolling_variance.cpp @@ -0,0 +1,208 @@ +// (C) Copyright Pieter Bastiaan Ober 2014. +// 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) + +#include <boost/test/unit_test.hpp> +#include <boost/test/floating_point_comparison.hpp> +#include <boost/mpl/assert.hpp> +#include <boost/type_traits/is_same.hpp> +#include <boost/accumulators/accumulators.hpp> +#include <boost/accumulators/statistics/stats.hpp> +#include <sstream> +#include <boost/archive/text_oarchive.hpp> +#include <boost/archive/text_iarchive.hpp> +#include <boost/accumulators/statistics/rolling_variance.hpp> + +using namespace boost; +using namespace unit_test; +using namespace accumulators; + +template<typename T> +void assert_is_double(T const &) +{ + BOOST_MPL_ASSERT((is_same<T, double>)); +} + +/* +REFERENCE VALUES PROVIDED BY OCTAVE: + +x=[1.2 2.3 3.4 4.5 0.4 2.2 7.1 4.0] + +v1_2 = var(x(1:2)) +v1_3 = var(x(1:3)) +v1_4 = var(x(1:4)) +v2_5 = var(x(2:5)) +v3_6 = var(x(3:6)) +v4_7 = var(x(4:7)) +v5_8 = var(x(5:8)) + +GIVES: + +v1_2 = 0.605000000000000 +v1_3 = 1.21000000000000 +v1_4 = 2.01666666666667 +v2_5 = 3.05666666666667 +v3_6 = 3.08250000000000 +v4_7 = 8.41666666666667 +v5_8 = 8.16250000000000 +*/ + +/////////////////////////////////////////////////////////////////////////////// +// rolling_variance_test_impl +// implements a test for window_size = 4 + +size_t window_size = 4; + +template<typename accumulator_set_type> +void rolling_variance_test_impl(accumulator_set_type& acc) +{ + // Window contains x(1), value is zero + acc(1.2); + BOOST_CHECK_CLOSE(rolling_variance(acc),0.0,1e-10); + + // Window contains x(1)...x(2) + acc(2.3); + BOOST_CHECK_CLOSE(rolling_variance(acc),0.605,1e-10); + + // Window contains x(1)...x(3) + acc(3.4); + BOOST_CHECK_CLOSE(rolling_variance(acc),1.21,1e-10); + + // Window contains x(1)...x(4) + acc(4.5); + BOOST_CHECK_CLOSE(rolling_variance(acc),2.01666666666667,1e-10); + + // Window contains x(2)...x(5) + acc(0.4); + BOOST_CHECK_CLOSE(rolling_variance(acc),3.05666666666667,1e-10); + + // Window contains x(3)...x(6) + acc(2.2); + BOOST_CHECK_CLOSE(rolling_variance(acc),3.08250000000000,1e-10); + + // Window contains x(4)...x(7) + acc(7.1); + BOOST_CHECK_CLOSE(rolling_variance(acc),8.41666666666667,1e-10); + + // Window contains x(5)...x(8) + acc(4.0); + BOOST_CHECK_CLOSE(rolling_variance(acc),8.16250000000000,1e-10); + + assert_is_double(rolling_variance(acc)); +} + +/////////////////////////////////////////////////////////////////////////////// +// test_rolling_variance +// +void test_rolling_variance() +{ + // tag::rolling_window::window_size + accumulator_set<double, stats<tag::immediate_rolling_variance> > + acc_immediate_rolling_variance(tag::immediate_rolling_variance::window_size = window_size); + + accumulator_set<double, stats<tag::immediate_rolling_variance, tag::rolling_mean> > + acc_immediate_rolling_variance2(tag::immediate_rolling_variance::window_size = window_size); + + accumulator_set<double, stats<tag::rolling_variance(immediate)> > + acc_immediate_rolling_variance3(tag::immediate_rolling_variance::window_size = window_size); + + accumulator_set<double, stats<tag::lazy_rolling_variance> > + acc_lazy_rolling_variance(tag::lazy_rolling_variance::window_size = window_size); + + accumulator_set<double, stats<tag::rolling_variance(lazy)> > + acc_lazy_rolling_variance2(tag::immediate_rolling_variance::window_size = window_size); + + accumulator_set<double, stats<tag::rolling_variance> > + acc_default_rolling_variance(tag::rolling_variance::window_size = window_size); + + //// test the different implementations + rolling_variance_test_impl(acc_immediate_rolling_variance); + rolling_variance_test_impl(acc_immediate_rolling_variance2); + rolling_variance_test_impl(acc_immediate_rolling_variance3); + rolling_variance_test_impl(acc_lazy_rolling_variance); + rolling_variance_test_impl(acc_lazy_rolling_variance2); + rolling_variance_test_impl(acc_default_rolling_variance); + + //// test that the default implementation is the 'immediate' computation + BOOST_REQUIRE(sizeof(acc_lazy_rolling_variance) != sizeof(acc_immediate_rolling_variance)); + BOOST_CHECK (sizeof(acc_default_rolling_variance) == sizeof(acc_immediate_rolling_variance)); + + //// test the equivalence of the different ways to indicate a feature + BOOST_CHECK (sizeof(acc_immediate_rolling_variance) == sizeof(acc_immediate_rolling_variance2)); + BOOST_CHECK (sizeof(acc_immediate_rolling_variance) == sizeof(acc_immediate_rolling_variance3)); + BOOST_CHECK (sizeof(acc_lazy_rolling_variance) == sizeof(acc_lazy_rolling_variance2)); +} + +/////////////////////////////////////////////////////////////////////////////// +// test_persistency_impl +// +template<typename accumulator_set_type> +void test_persistency_impl(accumulator_set_type& acc) +{ + std::stringstream ss; + { + acc(1.2); + acc(2.3); + acc(3.4); + acc(4.5); + acc(0.4); + acc(2.2); + acc(7.1); + acc(4.0); + BOOST_CHECK_CLOSE(rolling_variance(acc),8.16250000000000,1e-10); + boost::archive::text_oarchive oa(ss); + acc.serialize(oa, 0); + } + accumulator_set_type other_acc = acc; + boost::archive::text_iarchive ia(ss); + other_acc.serialize(ia, 0); + BOOST_CHECK_CLOSE(rolling_variance(acc),8.16250000000000,1e-10); + +} + +/////////////////////////////////////////////////////////////////////////////// +// test_persistency +// +void test_persistency() +{ + // tag::rolling_window::window_size + accumulator_set<double, stats<tag::immediate_rolling_variance> > + acc_immediate_rolling_variance(tag::immediate_rolling_variance::window_size = window_size); + + accumulator_set<double, stats<tag::immediate_rolling_variance, tag::rolling_mean> > + acc_immediate_rolling_variance2(tag::immediate_rolling_variance::window_size = window_size); + + accumulator_set<double, stats<tag::rolling_variance(immediate)> > + acc_immediate_rolling_variance3(tag::immediate_rolling_variance::window_size = window_size); + + accumulator_set<double, stats<tag::lazy_rolling_variance> > + acc_lazy_rolling_variance(tag::lazy_rolling_variance::window_size = window_size); + + accumulator_set<double, stats<tag::rolling_variance(lazy)> > + acc_lazy_rolling_variance2(tag::immediate_rolling_variance::window_size = window_size); + + accumulator_set<double, stats<tag::rolling_variance> > + acc_default_rolling_variance(tag::rolling_variance::window_size = window_size); + + //// test the different implementations + test_persistency_impl(acc_immediate_rolling_variance); + test_persistency_impl(acc_immediate_rolling_variance2); + test_persistency_impl(acc_immediate_rolling_variance3); + test_persistency_impl(acc_lazy_rolling_variance); + test_persistency_impl(acc_lazy_rolling_variance2); + test_persistency_impl(acc_default_rolling_variance); +} + +/////////////////////////////////////////////////////////////////////////////// +// init_unit_test_suite +// +test_suite* init_unit_test_suite( int argc, char* argv[] ) +{ + test_suite *test = BOOST_TEST_SUITE("rolling variance test"); + + test->add(BOOST_TEST_CASE(&test_rolling_variance)); + test->add(BOOST_TEST_CASE(&test_persistency)); + + return test; +} |