testing out new setup

R-Computing-Lab · Sep 14, 2023 · 2c63943 · 2c63943
1 parent a124eb4
commit 2c63943
Show file tree

Hide file tree

Showing 2 changed files with 2 additions and 2 deletions.
diff --git a/tests/testthat/test-ident.R b/tests/testthat/test-ident.R
@@ -7,6 +7,7 @@ test_that("identified model is identified", {
     E = diag(1, 4)
   )$identified)
 })
+
 test_that("underidentified model is unidentified", {
   set.seed(5)
 

diff --git a/tests/testthat/test-network.R b/tests/testthat/test-network.R
@@ -35,7 +35,7 @@ test_that("ped2graph produces a graph for inbreeding data", {
 
 
 test_that("ped2add produces correct matrix dims, values, and dimnames for hazard", {
-  data(hazard)
+       data(hazard)
   add <- ped2add(hazard)
   # Check dimension
   expect_equal(dim(add), c(nrow(hazard), nrow(hazard)))
@@ -158,5 +158,4 @@ test_that("ped2ce produces correct matrix dims, values, and dimnames", {
   dn <- dimnames(ce)
   expect_equal(dn[[1]], dn[[2]])
   expect_equal(dn[[1]], as.character(inbreeding$ID))
-  #  expect_silent(data(inbreeding))
 })