Commit | Line | Data |
---|---|---|
d9bb53c5 | 1 | context("wavelets discrete & continuous") |
0fe757f7 | 2 | |
d9bb53c5 BA |
3 | test_that("curvesToContribs behave as expected", |
4 | { | |
a52836b2 | 5 | # curvesToContribs(...) |
d9bb53c5 BA |
6 | }) |
7 | ||
8 | test_that("computeWerDists output correct results", | |
9 | { | |
10 | nbytes = 8 | |
11 | endian = "little" | |
12 | ||
13 | # On two identical series | |
14 | serie = rnorm(212, sd=5) | |
15 | synchrones = cbind(serie, serie) | |
a52836b2 | 16 | dists = computeWerDists(synchrones, 4, nbytes,endian,verbose=TRUE,parll=FALSE) |
d9bb53c5 BA |
17 | expect_equal(dists, matrix(0.,nrow=2,ncol=2)) |
18 | ||
19 | # On two constant series | |
20 | # TODO:... | |
21 | }) |