'update'
[epclust.git] / epclust / tests / testthat / test.wavelets.R
diff --git a/epclust/tests/testthat/test.wavelets.R b/epclust/tests/testthat/test.wavelets.R
deleted file mode 100644 (file)
index f29312d..0000000
+++ /dev/null
@@ -1,21 +0,0 @@
-context("wavelets discrete & continuous")
-
-test_that("curvesToContribs behave as expected",
-{
-#      curvesToContribs(...)
-})
-
-test_that("computeWerDists output correct results",
-{
-       nbytes = 8
-       endian = "little"
-
-       # On two identical series
-       serie = rnorm(212, sd=5)
-       synchrones = cbind(serie, serie)
-       dists = computeWerDists(synchrones, 4, nbytes,endian,verbose=TRUE,parll=FALSE)
-       expect_equal(dists, matrix(0.,nrow=2,ncol=2))
-
-       # On two constant series
-       # TODO:...
-})