From 1bc105feded6f8ca36634f4bc90afe57f9f8dace Mon Sep 17 00:00:00 2001 From: Jennifer Thom Date: Tue, 12 Dec 2023 14:59:03 +0000 Subject: [PATCH] fix tests --- man/slfhelper-package.Rd | 9 +++++++-- tests/testthat/test-multiple_years.R | 4 ++-- 2 files changed, 9 insertions(+), 4 deletions(-) diff --git a/man/slfhelper-package.Rd b/man/slfhelper-package.Rd index ed91708..d9bc8c0 100644 --- a/man/slfhelper-package.Rd +++ b/man/slfhelper-package.Rd @@ -6,7 +6,7 @@ \alias{slfhelper-package} \title{slfhelper: Useful functions for working with the Source Linkage Files} \description{ -This package provides a few helper functions for working with the Source Linkage Files (SLFs). The functions are mainly focussed on making the first steps of analysis easier. They can read in and filter the files in an efficient way using minimal syntax. If you find a bug or have any ideas for new functions or improvements get in touch or submit a pull request. +This package provides helper functions for working with the Source Linkage Files (SLFs). The functions are mainly focused on making the first steps of analysis easier. They can read and filter the files efficiently using minimal code. } \seealso{ Useful links: @@ -18,7 +18,12 @@ Useful links: } \author{ -\strong{Maintainer}: James McMahon \email{james.mcmahon@phs.scot} (\href{https://orcid.org/0000-0002-5380-2029}{ORCID}) +\strong{Maintainer}: Megan McNicol \email{megan.mcnicol2@phs.scot} + +Authors: +\itemize{ + \item James McMahon \email{james.mcmahon@phs.scot} (\href{https://orcid.org/0000-0002-5380-2029}{ORCID}) +} Other contributors: \itemize{ diff --git a/tests/testthat/test-multiple_years.R b/tests/testthat/test-multiple_years.R index bebf74b..1466a04 100644 --- a/tests/testthat/test-multiple_years.R +++ b/tests/testthat/test-multiple_years.R @@ -18,7 +18,7 @@ test_that("read multiple years works for individual file", { expect_length(indiv, 2) # Test for the correct number of rows (50 * 2) - expect_equal(nrow(indiv), 50) + expect_equal(nrow(indiv), 100) # This test keeps failing as the rows are not equal to 50, e.g 29 and 21 # # Test that we have 50 rows from each year @@ -45,7 +45,7 @@ test_that("read multiple years works for episode file", { expect_length(ep, 2) # Test for the correct number of rows (50 * 2) - expect_equal(nrow(ep), 50) + expect_equal(nrow(ep), 100) # This test keeps failing as the rows are not equal to 50, e.g 29 and 21 # # Test that we have 50 rows from each year