[Robast-commits] r506 - branches/robast-0.9/pkg/RobExtremes/tests/TestSuite

noreply at r-forge.r-project.org noreply at r-forge.r-project.org
Thu Sep 6 11:45:54 CEST 2012


Author: horbenko
Date: 2012-09-06 11:45:54 +0200 (Thu, 06 Sep 2012)
New Revision: 506

Added:
   branches/robast-0.9/pkg/RobExtremes/tests/TestSuite/.directory
   branches/robast-0.9/pkg/RobExtremes/tests/TestSuite/TestExpectation.R
   branches/robast-0.9/pkg/RobExtremes/tests/TestSuite/TestExpectation/
   branches/robast-0.9/pkg/RobExtremes/tests/TestSuite/TestFunctionals.R
   branches/robast-0.9/pkg/RobExtremes/tests/TestSuite/TestFunctionals/
   branches/robast-0.9/pkg/RobExtremes/tests/TestSuite/TestGEV.R
   branches/robast-0.9/pkg/RobExtremes/tests/TestSuite/TestGEV/
   branches/robast-0.9/pkg/RobExtremes/tests/TestSuite/TestGEVFamily.R
   branches/robast-0.9/pkg/RobExtremes/tests/TestSuite/TestGEVFamily/
   branches/robast-0.9/pkg/RobExtremes/tests/TestSuite/TestGPareto.R
   branches/robast-0.9/pkg/RobExtremes/tests/TestSuite/TestGPareto/
   branches/robast-0.9/pkg/RobExtremes/tests/TestSuite/TestGParetoFamily.R
   branches/robast-0.9/pkg/RobExtremes/tests/TestSuite/TestGParetoFamily/
   branches/robast-0.9/pkg/RobExtremes/tests/TestSuite/TestGumbel/
   branches/robast-0.9/pkg/RobExtremes/tests/TestSuite/TestGumbelLocationFamily.R
   branches/robast-0.9/pkg/RobExtremes/tests/TestSuite/TestGumbelLocationFamily/
   branches/robast-0.9/pkg/RobExtremes/tests/TestSuite/TestKurtosis.R
   branches/robast-0.9/pkg/RobExtremes/tests/TestSuite/TestKustosis/
   branches/robast-0.9/pkg/RobExtremes/tests/TestSuite/TestLDEstimator.R
   branches/robast-0.9/pkg/RobExtremes/tests/TestSuite/TestLDEstimator/
   branches/robast-0.9/pkg/RobExtremes/tests/TestSuite/TestPareto.R
   branches/robast-0.9/pkg/RobExtremes/tests/TestSuite/TestPareto/
   branches/robast-0.9/pkg/RobExtremes/tests/TestSuite/TestSkewness.R
   branches/robast-0.9/pkg/RobExtremes/tests/TestSuite/TestSkewness/
   branches/robast-0.9/pkg/RobExtremes/tests/TestSuite/TestSnQn.R
   branches/robast-0.9/pkg/RobExtremes/tests/TestSuite/TestSnQn/
   branches/robast-0.9/pkg/RobExtremes/tests/TestSuite/TestkMAD.R
   branches/robast-0.9/pkg/RobExtremes/tests/TestSuite/TestkMAD/
Log:


Added: branches/robast-0.9/pkg/RobExtremes/tests/TestSuite/.directory
===================================================================
--- branches/robast-0.9/pkg/RobExtremes/tests/TestSuite/.directory	                        (rev 0)
+++ branches/robast-0.9/pkg/RobExtremes/tests/TestSuite/.directory	2012-09-06 09:45:54 UTC (rev 506)
@@ -0,0 +1,4 @@
+[Dolphin]
+AdditionalInfo=3
+Timestamp=2012,9,6,10,11,9
+ViewMode=1

Added: branches/robast-0.9/pkg/RobExtremes/tests/TestSuite/TestExpectation.R
===================================================================
--- branches/robast-0.9/pkg/RobExtremes/tests/TestSuite/TestExpectation.R	                        (rev 0)
+++ branches/robast-0.9/pkg/RobExtremes/tests/TestSuite/TestExpectation.R	2012-09-06 09:45:54 UTC (rev 506)
@@ -0,0 +1,75 @@
+##########################################
+##                                      ## 
+##        Tests for Expectation.R       ##
+##                                      ##
+##########################################
+
+
+ .setUp()
+ {
+  test.expectationPareto = function(){
+   X = Pareto(shape=1,Min=1)
+   expectation.Pareto = E(X)
+   checkEquals(expectation.Pareto, Inf)
+   }
+  }
+
+ .tearDown()
+ {
+  }
+
+#  
+# 
+# .setUp()
+# {
+# test.checkFunctions1 = function(){
+# checkTrue(1 < 2, "check1") ## passes fine
+# ## checkTrue(1 > 2, "check2") ## appears as failure in the test protocol
+# v <- 1:3
+# w <- 1:3
+# checkEquals(v, w) ## passes fine
+# names(v) <- c("A", "B", "C")
+# ## checkEquals(v, w) ## fails because v and w have different names
+# checkEqualsNumeric(v, w) ## passes fine because names are ignored
+# x <- rep(1:12, 2)
+# y <- rep(0:1, 12)
+# res <- list(a=1:3, b=letters, LM=lm(y ~ x))
+# res2 <- list(a=seq(1,3,by=1), b=letters, LM=lm(y ~ x))
+# checkEquals(res, res2) ## passes fine
+# checkIdentical(res, res)
+# checkIdentical(res2, res2)
+# ## checkIdentical(res, res2) ## fails because element ’a’ differs in type
+# }
+# }
+# .tearDown()
+# {}
+# 
+# fun <- function(x) {
+# if(x)
+# {
+# stop("stop conditions signaled")
+# }
+# return()
+# 
+# }
+# 
+# .setUp()
+# {
+# test.checkFunctions2 = function(){
+# checkException(fun(TRUE)) ## passes fine
+# ## checkException(fun(FALSE)) ## failure, because fun raises no error
+# checkException(fun(TRUE), silent=TRUE)
+# ## special constants
+# ## same behaviour as for underlying base functions
+# checkEquals(NA, NA)
+# checkEquals(NaN, NaN)
+# checkEquals(Inf, Inf)
+# checkIdentical(NA, NA)
+# checkIdentical(NaN, NaN)
+# checkIdentical(-Inf, -Inf)
+# ## DEACTIVATED("here one can document on the reason for deactivation")
+# }
+# }
+# 
+# .tearDown()
+# {}
\ No newline at end of file

Added: branches/robast-0.9/pkg/RobExtremes/tests/TestSuite/TestFunctionals.R
===================================================================
--- branches/robast-0.9/pkg/RobExtremes/tests/TestSuite/TestFunctionals.R	                        (rev 0)
+++ branches/robast-0.9/pkg/RobExtremes/tests/TestSuite/TestFunctionals.R	2012-09-06 09:45:54 UTC (rev 506)
@@ -0,0 +1 @@
+ 

Added: branches/robast-0.9/pkg/RobExtremes/tests/TestSuite/TestGEV.R
===================================================================
--- branches/robast-0.9/pkg/RobExtremes/tests/TestSuite/TestGEV.R	                        (rev 0)
+++ branches/robast-0.9/pkg/RobExtremes/tests/TestSuite/TestGEV.R	2012-09-06 09:45:54 UTC (rev 506)
@@ -0,0 +1 @@
+ 

Added: branches/robast-0.9/pkg/RobExtremes/tests/TestSuite/TestGEVFamily.R
===================================================================
--- branches/robast-0.9/pkg/RobExtremes/tests/TestSuite/TestGEVFamily.R	                        (rev 0)
+++ branches/robast-0.9/pkg/RobExtremes/tests/TestSuite/TestGEVFamily.R	2012-09-06 09:45:54 UTC (rev 506)
@@ -0,0 +1 @@
+ 

Added: branches/robast-0.9/pkg/RobExtremes/tests/TestSuite/TestGPareto.R
===================================================================
--- branches/robast-0.9/pkg/RobExtremes/tests/TestSuite/TestGPareto.R	                        (rev 0)
+++ branches/robast-0.9/pkg/RobExtremes/tests/TestSuite/TestGPareto.R	2012-09-06 09:45:54 UTC (rev 506)
@@ -0,0 +1 @@
+ 

Added: branches/robast-0.9/pkg/RobExtremes/tests/TestSuite/TestGParetoFamily.R
===================================================================
--- branches/robast-0.9/pkg/RobExtremes/tests/TestSuite/TestGParetoFamily.R	                        (rev 0)
+++ branches/robast-0.9/pkg/RobExtremes/tests/TestSuite/TestGParetoFamily.R	2012-09-06 09:45:54 UTC (rev 506)
@@ -0,0 +1 @@
+ 

Added: branches/robast-0.9/pkg/RobExtremes/tests/TestSuite/TestGumbelLocationFamily.R
===================================================================
--- branches/robast-0.9/pkg/RobExtremes/tests/TestSuite/TestGumbelLocationFamily.R	                        (rev 0)
+++ branches/robast-0.9/pkg/RobExtremes/tests/TestSuite/TestGumbelLocationFamily.R	2012-09-06 09:45:54 UTC (rev 506)
@@ -0,0 +1 @@
+ 

Added: branches/robast-0.9/pkg/RobExtremes/tests/TestSuite/TestKurtosis.R
===================================================================
--- branches/robast-0.9/pkg/RobExtremes/tests/TestSuite/TestKurtosis.R	                        (rev 0)
+++ branches/robast-0.9/pkg/RobExtremes/tests/TestSuite/TestKurtosis.R	2012-09-06 09:45:54 UTC (rev 506)
@@ -0,0 +1 @@
+ 

Added: branches/robast-0.9/pkg/RobExtremes/tests/TestSuite/TestLDEstimator.R
===================================================================
--- branches/robast-0.9/pkg/RobExtremes/tests/TestSuite/TestLDEstimator.R	                        (rev 0)
+++ branches/robast-0.9/pkg/RobExtremes/tests/TestSuite/TestLDEstimator.R	2012-09-06 09:45:54 UTC (rev 506)
@@ -0,0 +1 @@
+ 

Added: branches/robast-0.9/pkg/RobExtremes/tests/TestSuite/TestPareto.R
===================================================================
--- branches/robast-0.9/pkg/RobExtremes/tests/TestSuite/TestPareto.R	                        (rev 0)
+++ branches/robast-0.9/pkg/RobExtremes/tests/TestSuite/TestPareto.R	2012-09-06 09:45:54 UTC (rev 506)
@@ -0,0 +1 @@
+ 

Added: branches/robast-0.9/pkg/RobExtremes/tests/TestSuite/TestSkewness.R
===================================================================
--- branches/robast-0.9/pkg/RobExtremes/tests/TestSuite/TestSkewness.R	                        (rev 0)
+++ branches/robast-0.9/pkg/RobExtremes/tests/TestSuite/TestSkewness.R	2012-09-06 09:45:54 UTC (rev 506)
@@ -0,0 +1 @@
+ 

Added: branches/robast-0.9/pkg/RobExtremes/tests/TestSuite/TestSnQn.R
===================================================================
--- branches/robast-0.9/pkg/RobExtremes/tests/TestSuite/TestSnQn.R	                        (rev 0)
+++ branches/robast-0.9/pkg/RobExtremes/tests/TestSuite/TestSnQn.R	2012-09-06 09:45:54 UTC (rev 506)
@@ -0,0 +1 @@
+ 

Added: branches/robast-0.9/pkg/RobExtremes/tests/TestSuite/TestkMAD.R
===================================================================
--- branches/robast-0.9/pkg/RobExtremes/tests/TestSuite/TestkMAD.R	                        (rev 0)
+++ branches/robast-0.9/pkg/RobExtremes/tests/TestSuite/TestkMAD.R	2012-09-06 09:45:54 UTC (rev 506)
@@ -0,0 +1 @@
+ 



More information about the Robast-commits mailing list