[Vennerable-commits] r40 - pkg/Vennerable/tests

[noreply at r-forge.r-project.org]

Author: js229
Date: 2009-08-04 19:26:45 +0200 (Tue, 04 Aug 2009)
New Revision: 40

Added:
   pkg/Vennerable/tests/bug0521AprilMayNovember.R
   pkg/Vennerable/tests/bug0532JuneAprilMay.R
Removed:
   pkg/Vennerable/tests/bug0521JuneAprilMay.R
Log:
get tests round right way

Added: pkg/Vennerable/tests/bug0521AprilMayNovember.R
===================================================================
--- pkg/Vennerable/tests/bug0521AprilMayNovember.R	                        (rev 0)
+++ pkg/Vennerable/tests/bug0521AprilMayNovember.R	2009-08-04 17:26:45 UTC (rev 40)
@@ -0,0 +1,8 @@
+library(Vennerable)
+setList <- strsplit(month.name,split="")
+names(setList) <- month.name
+Vempty2 <- VennFromSets( setList[c(4,5,11)])
+TJAM <- compute.Venn(Vempty2)
+.validateDrawing(TJAM)
+plot(TJAM)
+ 

Deleted: pkg/Vennerable/tests/bug0521JuneAprilMay.R
===================================================================
--- pkg/Vennerable/tests/bug0521JuneAprilMay.R	2009-08-02 11:05:56 UTC (rev 39)
+++ pkg/Vennerable/tests/bug0521JuneAprilMay.R	2009-08-04 17:26:45 UTC (rev 40)
@@ -1,8 +0,0 @@
-library(Vennerable)
-setList <- strsplit(month.name,split="")
-names(setList) <- month.name
-Vempty2 <- VennFromSets( setList[c(4,5,11)])
-TJAM <- compute.Venn(Vempty2)
-.validateDrawing(TJAM)
-
- 

Added: pkg/Vennerable/tests/bug0532JuneAprilMay.R
===================================================================
--- pkg/Vennerable/tests/bug0532JuneAprilMay.R	                        (rev 0)
+++ pkg/Vennerable/tests/bug0532JuneAprilMay.R	2009-08-04 17:26:45 UTC (rev 40)
@@ -0,0 +1,8 @@
+library(Vennerable)
+setList <- strsplit(month.name,split="")
+names(setList) <- month.name
+Vempty2 <- VennFromSets( setList[c(4,5,6)])
+TJAM <- compute.Venn(Vempty2)
+.validateDrawing(TJAM)
+
+