test/test_anova.rb in statsample-0.5.0 vs test/test_anova.rb in statsample-0.5.1

- old
+ new

@@ -2,26 +2,26 @@ require 'statsample' require 'test/unit' class StatsampleAnovaTestCase < Test::Unit::TestCase def initialize(*args) - @v1=[3,3,2,3,6].to_vector(:scale) - @v2=[7,6,5,6,7].to_vector(:scale) - @v3=[9,8,9,7,8].to_vector(:scale) - @anova=Statsample::Anova::OneWay.new([@v1,@v2,@v3]) + @v1=[3,3,2,3,6].to_vector(:scale) + @v2=[7,6,5,6,7].to_vector(:scale) + @v3=[9,8,9,7,8].to_vector(:scale) + @anova=Statsample::Anova::OneWay.new([@v1,@v2,@v3]) super end - def test_basic - assert_in_delta(72.933, @anova.sst,0.001) - assert_in_delta(14.8,@anova.sswg,0.001) - assert_in_delta(58.133,@anova.ssbg,0.001) - assert_in_delta(@anova.sst,@anova.sswg+@anova.ssbg,0.00001) - assert_equal(14,@anova.df_total) - assert_equal(12,@anova.df_wg) - assert_equal(2,@anova.df_bg) - assert_in_delta(23.568,@anova.f,0.001) - anova2=Statsample::Anova::OneWay.new([@v1,@v1,@v1,@v1,@v2]) - assert_in_delta(3.960, anova2.f,0.001) + def test_basic + assert_in_delta(72.933, @anova.sst,0.001) + assert_in_delta(14.8,@anova.sswg,0.001) + assert_in_delta(58.133,@anova.ssbg,0.001) + assert_in_delta(@anova.sst,@anova.sswg+@anova.ssbg,0.00001) + assert_equal(14,@anova.df_total) + assert_equal(12,@anova.df_wg) + assert_equal(2,@anova.df_bg) + assert_in_delta(23.568,@anova.f,0.001) + anova2=Statsample::Anova::OneWay.new([@v1,@v1,@v1,@v1,@v2]) + assert_in_delta(3.960, anova2.f,0.001) assert(@anova.significance<0.01) assert_in_delta(0.016, anova2.significance,0.001) - end + end end \ No newline at end of file