Skip to content

Commit

Permalink
update news
Browse files Browse the repository at this point in the history
  • Loading branch information
wjschne committed Jun 6, 2024
1 parent aab819f commit 9308010
Show file tree
Hide file tree
Showing 3 changed files with 14 additions and 8 deletions.
4 changes: 4 additions & 0 deletions NEWS.md
Original file line number Diff line number Diff line change
Expand Up @@ -6,3 +6,7 @@
# arrowheadr 1.0.0 _2024-06-06_

* Initial CRAN submission.

# arrowheadr 1.0.1 _2024-06-06_

* CRAN fixes.
4 changes: 2 additions & 2 deletions cran-comments.md
Original file line number Diff line number Diff line change
Expand Up @@ -8,5 +8,5 @@ As recommended in a note from Beni Altmann on 2024-06-06, I have made the follow

* I have added more details in the Description field at about what the package does.
* In the Description field, I have enclosed the names of packages in single quotes.
* I used the `on.exit` function as recommended to reset the user's `par` when the special plotting function is exited.
* I removed a change to the user's `par` in one of the examples.
* I removed all use of `par` in my functions and examples.

14 changes: 8 additions & 6 deletions tests/testthat/test-main.R
Original file line number Diff line number Diff line change
Expand Up @@ -37,10 +37,12 @@ test_that("reflecter", {


test_that("rotater", {
expect_identical(round(rotater(matrix(c(0,1), ncol = 2), theta = pi),10),
matrix(c(0,-1), ncol = 2))
expect_error(rotater(matrix(c(0,1, 1), ncol = 3)), "x must be a 2-column matrix or a length-2 vector")

expect_identical(round(rotater(c(0,1), theta = pi),10),
matrix(c(0,-1), ncol = 2))
expect_identical(round(rotater(matrix(c(0, 1), ncol = 2),
theta = pi), 10),
matrix(c(0, -1), ncol = 2))
expect_error(rotater(matrix(c(0, 1, 1), ncol = 3)),
"x must be a 2-column matrix or a length-2 vector")

expect_identical(round(rotater(c(0, 1), theta = pi), 10),
matrix(c(0, -1), ncol = 2))
})

0 comments on commit 9308010

Please sign in to comment.