From noreply at r-forge.r-project.org  Tue Sep  9 13:12:10 2014
From: noreply at r-forge.r-project.org (noreply at r-forge.r-project.org)
Date: Tue,  9 Sep 2014 13:12:10 +0200 (CEST)
Subject: [Ifrogs-commits] r9 - pkg/inst/tests
Message-ID: <20140909111210.6F276186766@r-forge.r-project.org>

Author: chiraganand
Date: 2014-09-09 13:12:09 +0200 (Tue, 09 Sep 2014)
New Revision: 9

Modified:
   pkg/inst/tests/test_prep_maturity.R
   pkg/inst/tests/test_vix_ci.R
   pkg/inst/tests/test_vix_pt.R
   pkg/inst/tests/test_vxo.R
   pkg/inst/tests/test_weighted_iv.R
Log:
Fixed the package name in test code.

Modified: pkg/inst/tests/test_prep_maturity.R
===================================================================
--- pkg/inst/tests/test_prep_maturity.R	2014-02-01 11:53:51 UTC (rev 8)
+++ pkg/inst/tests/test_prep_maturity.R	2014-09-09 11:12:09 UTC (rev 9)
@@ -1,11 +1,11 @@
 context("VIX")
 
 test_that("test.prep_maturity", {
-  load(system.file("data", "vix_spx.RData", package = "ifrogs.dev"))
-  load(system.file("data", "vix_nifty.RData", package = "ifrogs.dev"))
+  load(system.file("data", "vix_spx.RData", package = "ifrogs"))
+  load(system.file("data", "vix_nifty.RData", package = "ifrogs"))
 
                                         # load the test output data
-  load(system.file("tests", "data_prep_maturity.RData", package = "ifrogs.dev"))
+  load(system.file("tests", "data_prep_maturity.RData", package = "ifrogs"))
 
   test_spx_near <- prep_maturity(maturity=vix_spx$opt_near$maturity[[1]],
                                  riskfree=vix_spx$opt_near$riskfree[[1]],

Modified: pkg/inst/tests/test_vix_ci.R
===================================================================
--- pkg/inst/tests/test_vix_ci.R	2014-02-01 11:53:51 UTC (rev 8)
+++ pkg/inst/tests/test_vix_ci.R	2014-09-09 11:12:09 UTC (rev 9)
@@ -1,11 +1,11 @@
 context("VIX")
 
 test_that("test.vix_ci", {
-  load(system.file("data", "vix_spx.RData", package = "ifrogs.dev"))
-  load(system.file("data", "vix_nifty.RData", package = "ifrogs.dev"))
+  load(system.file("data", "vix_spx.RData", package = "ifrogs"))
+  load(system.file("data", "vix_nifty.RData", package = "ifrogs"))
 
                                         # load the test output data
-  load(system.file("tests", "data_vix_ci.RData", package = "ifrogs.dev"))
+  load(system.file("tests", "data_vix_ci.RData", package = "ifrogs"))
   set.seed(101)
   test_spx_near <- prep_maturity(maturity=vix_spx$opt_near$maturity[[1]],
                                  riskfree=vix_spx$opt_near$riskfree[[1]],

Modified: pkg/inst/tests/test_vix_pt.R
===================================================================
--- pkg/inst/tests/test_vix_pt.R	2014-02-01 11:53:51 UTC (rev 8)
+++ pkg/inst/tests/test_vix_pt.R	2014-09-09 11:12:09 UTC (rev 9)
@@ -1,11 +1,11 @@
 context("VIX")
 
 test_that("test.vix_pt", {
-  load(system.file("data", "vix_spx.RData", package = "ifrogs.dev"))
-  load(system.file("data", "vix_nifty.RData", package = "ifrogs.dev"))
+  load(system.file("data", "vix_spx.RData", package = "ifrogs"))
+  load(system.file("data", "vix_nifty.RData", package = "ifrogs"))
 
                                         # load the test output data
-  load(system.file("tests", "data_vix_pt.RData", package = "ifrogs.dev"))
+  load(system.file("tests", "data_vix_pt.RData", package = "ifrogs"))
 
   test_spx_near <- prep_maturity(maturity=vix_spx$opt_near$maturity[[1]],
                                  riskfree=vix_spx$opt_near$riskfree[[1]],

Modified: pkg/inst/tests/test_vxo.R
===================================================================
--- pkg/inst/tests/test_vxo.R	2014-02-01 11:53:51 UTC (rev 8)
+++ pkg/inst/tests/test_vxo.R	2014-09-09 11:12:09 UTC (rev 9)
@@ -1,11 +1,11 @@
 context("VIX")
 
 test_that("test.vxo", {
-  load(system.file("data", "vxo_spx.RData", package = "ifrogs.dev"))
-  load(system.file("data", "vxo_nifty.RData", package = "ifrogs.dev"))
+  load(system.file("data", "vxo_spx.RData", package = "ifrogs"))
+  load(system.file("data", "vxo_nifty.RData", package = "ifrogs"))
 
                                         # load the test output data
-  load(system.file("tests", "data_vxo.RData", package = "ifrogs.dev"))
+  load(system.file("tests", "data_vxo.RData", package = "ifrogs"))
   
   test_spx_vxo <- vxo(maturity=vxo_spx$maturity, riskfree=vxo_spx$riskfree,
                       carry=vxo_spx$riskfree, type=vxo_spx$type,

Modified: pkg/inst/tests/test_weighted_iv.R
===================================================================
--- pkg/inst/tests/test_weighted_iv.R	2014-02-01 11:53:51 UTC (rev 8)
+++ pkg/inst/tests/test_weighted_iv.R	2014-09-09 11:12:09 UTC (rev 9)
@@ -1,11 +1,11 @@
 context("VIX")
 
 test_that("test.weighted_iv", {
-  load(system.file("data", "vix_spx.RData", package = "ifrogs.dev"))
-  load(system.file("data", "vix_nifty.RData", package = "ifrogs.dev"))
+  load(system.file("data", "vix_spx.RData", package = "ifrogs"))
+  load(system.file("data", "vix_nifty.RData", package = "ifrogs"))
 
                                         # load the test output data
-  load(system.file("tests", "data_weighted_iv.RData", package = "ifrogs.dev"))
+  load(system.file("tests", "data_weighted_iv.RData", package = "ifrogs"))
  
   test_spx_near <- prep_maturity(maturity=vix_spx$opt_near$maturity[[1]],
                                  riskfree=vix_spx$opt_near$riskfree[[1]],