test/test_statistics.rb in statsample-1.4.3 vs test/test_statistics.rb in statsample-1.5.0

- old
+ new

@@ -30,11 +30,11 @@ assert(!'a10'.is_number?) assert(!''.is_number?) end def test_estimation_mean - v = ([42] * 23 + [41] * 4 + [36] * 1 + [32] * 1 + [29] * 1 + [27] * 2 + [23] * 1 + [19] * 1 + [16] * 2 + [15] * 2 + [14, 11, 10, 9, 7] + [6] * 3 + [5] * 2 + [4, 3]).to_vector(:scale) + v = ([42] * 23 + [41] * 4 + [36] * 1 + [32] * 1 + [29] * 1 + [27] * 2 + [23] * 1 + [19] * 1 + [16] * 2 + [15] * 2 + [14, 11, 10, 9, 7] + [6] * 3 + [5] * 2 + [4, 3]).to_vector(:numeric) assert_equal(50, v.size) assert_equal(1471, v.sum) # limits=Statsample::SRS.mean_confidence_interval_z(v.mean(), v.sds(), v.size,676,0.80) end @@ -55,20 +55,20 @@ assert_in_delta(0.46, l[1], 0.01) end def test_ml if true - # real=[1,1,1,1].to_vector(:scale) + # real=[1,1,1,1].to_vector(:numeric) - # pred=[0.0001,0.0001,0.0001,0.0001].to_vector(:scale) + # pred=[0.0001,0.0001,0.0001,0.0001].to_vector(:numeric) # puts Statsample::Bivariate.maximum_likehood_dichotomic(pred,real) end end def test_simple_linear_regression - a = [1, 2, 3, 4, 5, 6].to_vector(:scale) - b = [6, 2, 4, 10, 12, 8].to_vector(:scale) + a = [1, 2, 3, 4, 5, 6].to_vector(:numeric) + b = [6, 2, 4, 10, 12, 8].to_vector(:numeric) reg = Statsample::Regression::Simple.new_from_vectors(a, b) assert_in_delta((reg.ssr + reg.sse).to_f, reg.sst, 0.001) assert_in_delta(Statsample::Bivariate.pearson(a, b), reg.r, 0.001) assert_in_delta(2.4, reg.a, 0.01) assert_in_delta(1.314, reg.b, 0.001)