1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
|
require 'rubygems'
require 'opentox-ruby'
require 'test/unit'
class TransformTest < Test::Unit::TestCase
def test_mlr
2.times {
n_prop = [ [1,1], [2,2], [3,3] ] # erste WH
acts = [ 3,2,3 ] # should yield a constant y=2.8
sims = [ 4,2,4 ] # move constant closer to 3.0
q_prop = [0.5,0.5] # extrapolation
params={:n_prop => n_prop, :q_prop => q_prop, :sims => sims, :acts => acts}
prediction = OpenTox::Algorithm::Neighbors.mlr(params)
assert_in_delta prediction, 2.8, 1.0E-10 # small deviations, don't know why
q_prop = [1.5,1.5] # interpolation
prediction = OpenTox::Algorithm::Neighbors.mlr(params)
assert_in_delta prediction, 2.8, 1.0E-10 # small deviations, don't know why
}
end
def test_pca
d = GSL::Matrix.alloc([1,1.1,2,1.9,3,3.3], 3, 2)
td = GSL::Matrix.alloc([-1.64373917483226, -0.155542754209564, 1.79928192904182],3,1)
ev = GSL::Matrix.alloc([0.707106781186548, 0.707106781186548], 2, 1)
rd = GSL::Matrix.alloc([1.05098674493306, 1.043223563717, 1.91019734898661, 2.0, 3.03881590608033, 3.256776436283], 3, 2)
# Lossy
2.times do # repeat to ensure idempotency
pca = OpenTox::Algorithm::Transform::PCA.new(d, 0.05)
assert_equal pca.data_matrix, d
assert_equal pca.data_transformed_matrix, td
assert_equal pca.eigenvector_matrix, ev
assert_equal pca.restore, rd
end
td = GSL::Matrix.alloc([-1.64373917483226, 0.0883116327366195, -0.155542754209564, -0.155542754209564, 1.79928192904182, 0.0672311214729441],3,2)
ev = GSL::Matrix.alloc([0.707106781186548, -0.707106781186548, 0.707106781186548, 0.707106781186548], 2, 2)
# Lossless
2.times do
pca = OpenTox::Algorithm::Transform::PCA.new(d, 0.0)
assert_equal pca.data_matrix, d
assert_equal pca.data_transformed_matrix, td
assert_equal pca.eigenvector_matrix, ev
assert_equal pca.restore, d
end
end
end
|
