| // Copyright 2015 The Go Authors. All rights reserved. | |
| // Use of this source code is governed by a BSD-style | |
| // license that can be found in the LICENSE file. | |
| package stats | |
| import "testing" | |
| func TestTTest(t *testing.T) { | |
| s1 := Sample{Xs: []float64{2, 1, 3, 4}} | |
| s2 := Sample{Xs: []float64{6, 5, 7, 9}} | |
| check := func(want, got *TTestResult) { | |
| if want.N1 != got.N1 || want.N2 != got.N2 || | |
| !aeq(want.T, got.T) || !aeq(want.DoF, got.DoF) || | |
| want.AltHypothesis != got.AltHypothesis || | |
| !aeq(want.P, got.P) { | |
| t.Errorf("want %+v, got %+v", want, got) | |
| } | |
| } | |
| check3 := func(test func(alt LocationHypothesis) (*TTestResult, error), n1, n2 int, t, dof float64, pless, pdiff, pgreater float64) { | |
| want := &TTestResult{N1: n1, N2: n2, T: t, DoF: dof} | |
| want.AltHypothesis = LocationLess | |
| want.P = pless | |
| got, _ := test(want.AltHypothesis) | |
| check(want, got) | |
| want.AltHypothesis = LocationDiffers | |
| want.P = pdiff | |
| got, _ = test(want.AltHypothesis) | |
| check(want, got) | |
| want.AltHypothesis = LocationGreater | |
| want.P = pgreater | |
| got, _ = test(want.AltHypothesis) | |
| check(want, got) | |
| } | |
| check3(func(alt LocationHypothesis) (*TTestResult, error) { | |
| return TwoSampleTTest(s1, s1, alt) | |
| }, 4, 4, 0, 6, | |
| 0.5, 1, 0.5) | |
| check3(func(alt LocationHypothesis) (*TTestResult, error) { | |
| return TwoSampleWelchTTest(s1, s1, alt) | |
| }, 4, 4, 0, 6, | |
| 0.5, 1, 0.5) | |
| check3(func(alt LocationHypothesis) (*TTestResult, error) { | |
| return TwoSampleTTest(s1, s2, alt) | |
| }, 4, 4, -3.9703446152237674, 6, | |
| 0.0036820296121056195, 0.0073640592242113214, 0.9963179703878944) | |
| check3(func(alt LocationHypothesis) (*TTestResult, error) { | |
| return TwoSampleWelchTTest(s1, s2, alt) | |
| }, 4, 4, -3.9703446152237674, 5.584615384615385, | |
| 0.004256431565689112, 0.0085128631313781695, 0.9957435684343109) | |
| check3(func(alt LocationHypothesis) (*TTestResult, error) { | |
| return PairedTTest(s1.Xs, s2.Xs, 0, alt) | |
| }, 4, 4, -17, 3, | |
| 0.0002216717691559955, 0.00044334353831207749, 0.999778328230844) | |
| check3(func(alt LocationHypothesis) (*TTestResult, error) { | |
| return OneSampleTTest(s1, 0, alt) | |
| }, 4, 0, 3.872983346207417, 3, | |
| 0.9847668541689145, 0.030466291662170977, 0.015233145831085482) | |
| check3(func(alt LocationHypothesis) (*TTestResult, error) { | |
| return OneSampleTTest(s1, 2.5, alt) | |
| }, 4, 0, 0, 3, | |
| 0.5, 1, 0.5) | |
| } |