update test, version, changelog, docs

lldelisle · Feb 11, 2021 · 171e38c · 171e38c
1 parent dec3f7f
commit 171e38c
Show file tree

Hide file tree

Showing 4 changed files with 19 additions and 4 deletions.
diff --git a/CHANGELOG.rst b/CHANGELOG.rst
@@ -1,6 +1,18 @@
 ChangeLog
 =========
 
+v0.1.5 (2021-02-11)
+-------------------
+
+Bug Fix:
+
+* Fixed a bug in rVersionAbove
+
+Improvements:
+
+* New method for cornerMat
+
+
 v0.1.4 (2020-06-08)
 -------------------
 

diff --git a/DESCRIPTION b/DESCRIPTION
@@ -1,6 +1,6 @@
 Package: usefulLDfunctions
 Title: Functions That I Use Regularly
-Version: 0.1.4
+Version: 0.1.5
 Authors@R: 
     person(given = "Lucille",
            family = "Lopez-Delisle",
@@ -11,7 +11,7 @@ Description: Useful functions to do plots, manipulate bed files with headers etc
 License: CC BY 4.0
 Encoding: UTF-8
 LazyData: true
-RoxygenNote: 7.1.0
+RoxygenNote: 7.1.1
 Imports: 
   stats,
   grDevices,

diff --git a/man/cornerMat.Rd b/man/cornerMat.Rd
diff --git a/tests/testthat/testBasicFunctions.R b/tests/testthat/testBasicFunctions.R
@@ -201,8 +201,9 @@ test_that("cornerMat gives expected results", {
   expected <- matrix(rep(c(98, 99, 100), 3) +
                        rep(c(0, 100, 200), each = 3),
                      ncol = 3)
-  rownames(expected) <- c(" [98,]", " [99,]", "[100,]")
   expect_equal(cornerMat(myHugeMatrix, 3, "bottomleft"), expected)
+  rownames(expected) <- c(" [98,]", " [99,]", "[100,]")
+  expect_equal(cornerMat(myHugeMatrix, 3, "bottomleft", method = "headtail"), expected)
   mySmallMatrix <- matrix(1:9, nrow = 3)
   expect_equal(cornerMat(mySmallMatrix), mySmallMatrix)
 })