Skip to content

HTTPS clone URL

Subversion checkout URL

You can clone with
or
.
Download ZIP
Fetching contributors…

Cannot retrieve contributors at this time

39 lines (36 sloc) 1.347 kB
require(File.expand_path(File.dirname(__FILE__)+'/helpers_tests.rb'))
class StatsampleAnovaTwoWayTestCase < MiniTest::Unit::TestCase
context(Statsample::Anova::TwoWay) do
setup do
@ss_a=192.2
@ss_b=57.8
@ss_axb=168.2
@ss_within=75.6
@df_a=@df_b=1
@df_within=16
@anova=Statsample::Anova::TwoWay.new(:ss_a=>@ss_a, :ss_b=>@ss_b, :ss_axb=>@ss_axb, :ss_within=>@ss_within , :df_a=>@df_a, :df_b=>@df_b, :df_within=>@df_within)
end
should "Statsample::Anova.twoway respond to #twoway" do
assert(Statsample::Anova.respond_to? :twoway)
end
should "return correct value for ms_a, ms_b and ms_axb" do
assert_in_delta(192.2, @anova.ms_a, 0.01)
assert_in_delta(57.8, @anova.ms_b, 0.01)
assert_in_delta(168.2, @anova.ms_axb, 0.01)
end
should "return correct value for f " do
assert_in_delta(40.68, @anova.f_a, 0.01)
assert_in_delta(12.23, @anova.f_b, 0.01)
assert_in_delta(35.60, @anova.f_axb, 0.01)
end
should "return correct value for probability for f " do
assert(@anova.f_a_probability < 0.05)
assert(@anova.f_b_probability < 0.05)
assert(@anova.f_axb_probability < 0.05)
end
should "respond to summary" do
assert(@anova.respond_to? :summary)
assert(@anova.summary.size>0)
end
end
end
Jump to Line
Something went wrong with that request. Please try again.