From ef00b85499e16d00bf044147f1f737276d459c66 Mon Sep 17 00:00:00 2001 From: Philip Leifeld Date: Tue, 23 Jul 2024 18:28:41 +0200 Subject: [PATCH] Fixed README badge and remstimate unit test --- README.md | 2 +- tests/testthat/test-extract.R | 2 -- 2 files changed, 1 insertion(+), 3 deletions(-) diff --git a/README.md b/README.md index 1f6cd7e..8dfea91 100644 --- a/README.md +++ b/README.md @@ -28,7 +28,7 @@ remotes::install_github("leifeld/texreg") Please feel free to report bugs or suggested enhancements using the [issue tracker](http://github.com/leifeld/texreg/issues) and propose solutions for known bugs using a pull request. Please observe and follow the code formatting in the texreg package when doing so, and add (or update) `testthat` unit tests to your pull requests if possible. [![CRAN check and test](https://github.com/leifeld/texreg/actions/workflows/CRAN%20check%20and%20test.yaml/badge.svg)](https://github.com/leifeld/texreg/actions/workflows/CRAN%20check%20and%20test.yaml) -[![cran version](http://www.r-pkg.org/badges/version/texreg)](https://cran.r-project.org/package=texreg) +[![cran version](https://www.r-pkg.org/badges/version/texreg)](https://cran.r-project.org/package=texreg) [![downloads](https://cranlogs.r-pkg.org/badges/texreg)](http://cranlogs.r-pkg.org/badges/texreg) [![total downloads](https://cranlogs.r-pkg.org/badges/grand-total/texreg)](http://cranlogs.r-pkg.org/badges/grand-total/texreg) [![Research software impact](http://depsy.org/api/package/cran/texreg/badge.svg)](http://depsy.org/package/r/texreg) diff --git a/tests/testthat/test-extract.R b/tests/testthat/test-extract.R index 351df33..c05d636 100644 --- a/tests/testthat/test-extract.R +++ b/tests/testthat/test-extract.R @@ -886,7 +886,6 @@ test_that("extract remstimate objects from the remstimate package", { method = "BSIR", ncores = 1) mr1 <- matrixreg(list(rem1, rem2, rem3, rem4)) - expect_equal(as.numeric(object.size(mr1)), 3712) expect_true("matrix" %in% class(mr1)) expect_equal(nrow(mr1), 14) expect_equal(ncol(mr1), 5) @@ -917,7 +916,6 @@ test_that("extract remstimate objects from the remstimate package", { expect_length(tr5[[2]]@gof, 5) expect_equal(tr5[[2]]@model.name, "receiver_model") mr2 <- matrixreg(list(rem5, rem6, rem7)) - expect_equal(as.numeric(object.size(mr2)), 3856) expect_true("matrix" %in% class(mr2)) expect_equal(nrow(mr2), 12) expect_equal(ncol(mr2), 7)