[Pomp-commits] r1004 - pkg/pomp/tests

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

Author: kingaa
Date: 2014-09-02 17:32:24 +0200 (Tue, 02 Sep 2014)
New Revision: 1004

Modified:
   pkg/pomp/tests/demos.R
Log:
- run demos during check even under windows

Modified: pkg/pomp/tests/demos.R
===================================================================
--- pkg/pomp/tests/demos.R	2014-09-02 14:53:23 UTC (rev 1003)
+++ pkg/pomp/tests/demos.R	2014-09-02 15:32:24 UTC (rev 1004)
@@ -1,18 +1,14 @@
-if (Sys.getenv("POMP_FULL_TESTS")=="yes") {
+library(pomp)
 
-  library(pomp)
+pdf.options(useDingbats=FALSE)
+pdf(file="demos.pdf")
 
-  pdf.options(useDingbats=FALSE)
-  pdf(file="demos.pdf")
+set.seed(47575684)
 
-  set.seed(47575684)
+demos <- list.files(path=system.file("demo",package="pomp"),pattern=".\\.R$",full.names=TRUE)
 
-  demos <- list.files(path=system.file("demo",package="pomp"),pattern=".\\.R$",full.names=TRUE)
-
-  for (d in demos) {
-    source(d,local=TRUE,echo=TRUE)
-  }
-
-  dev.off()
-
+for (d in demos) {
+  source(d,local=TRUE,echo=TRUE)
 }
+
+dev.off()