From 5d2cfc4fe472ba00d2284a0a2fd34f2aff8d0a87 Mon Sep 17 00:00:00 2001 From: Daniel Blankenberg Date: Tue, 30 Aug 2011 09:33:10 -0400 Subject: [PATCH] Update for wavelet variance tool contributed by Erika Kvikstad. --- tools/discreteWavelet/execute_dwt_var_perFeature.pl | 8 ++++---- 1 file changed, 4 insertions(+), 4 deletions(-) diff --git a/tools/discreteWavelet/execute_dwt_var_perFeature.pl b/tools/discreteWavelet/execute_dwt_var_perFeature.pl index 8021fc55258..6ee58a4a5fd 100644 --- a/tools/discreteWavelet/execute_dwt_var_perFeature.pl +++ b/tools/discreteWavelet/execute_dwt_var_perFeature.pl @@ -41,10 +41,10 @@ print Rcmd " #library(\"wavethresh\"); #library(\"waveslim\"); # turn off diagnostics for de-bugging only, turn back on for functional tests on test - require(\"Rwave\",quietly=TRUE,warn.conflicts = FALSE); - require(\"wavethresh\",quietly=TRUE,warn.conflicts = FALSE); - require(\"waveslim\",quietly=TRUE,warn.conflicts = FALSE); - require(\"bitops\",quietly=TRUE,warn.conflicts = FALSE); + suppressMessages(require(\"Rwave\",quietly=TRUE,warn.conflicts = FALSE)); + suppressMessages(require(\"wavethresh\",quietly=TRUE,warn.conflicts = FALSE)); + suppressMessages(require(\"waveslim\",quietly=TRUE,warn.conflicts = FALSE)); + suppressMessages(require(\"bitops\",quietly=TRUE,warn.conflicts = FALSE)); # to determine if data is properly formatted 2^N observations is.power2<- function(x){x && !(bitAnd(x,x - 1));}