workingon test coverage #4

.github/workflows/test-coverage.yaml

@@ -0,0 +1,53 @@
+on:
+  push:
+    branches:
+      - main
+      - master
+  pull_request:
+    branches:
+      - main
+      - master
+
+name: test-coverage
+
+jobs:
+  test-coverage:
+    runs-on: macOS-latest
+    env:
+      GITHUB_PAT: ${{ secrets.GITHUB_TOKEN }}
+    steps:
+      - uses: actions/checkout@v2
+
+      - uses: r-lib/actions/setup-r@v1
+
+      - uses: r-lib/actions/setup-pandoc@v1
+
+      - name: Query dependencies
+        run: |
+          install.packages('remotes')
+          saveRDS(remotes::dev_package_deps(dependencies = TRUE), ".github/depends.Rds", version = 2)
+          writeLines(sprintf("R-%i.%i", getRversion()$major, getRversion()$minor), ".github/R-version")
+        shell: Rscript {0}
+
+      - name: Cache R packages
+        uses: actions/cache@v2
+        with:
+          path: ${{ env.R_LIBS_USER }}
+          key: ${{ runner.os }}-${{ hashFiles('.github/R-version') }}-1-${{ hashFiles('.github/depends.Rds') }}
+          restore-keys: ${{ runner.os }}-${{ hashFiles('.github/R-version') }}-1-
+
+      - name: Install OS dependencies
+        run : |
+          rm '/usr/local/bin/gfortran'
+          brew install jags
+          
+      - name: Install dependencies
+        run: |
+          install.packages(c("remotes"))
+          remotes::install_deps(dependencies = TRUE)
+          remotes::install_cran("covr")
+        shell: Rscript {0}
+
+      - name: Test coverage
+        run: covr::codecov()
+        shell: Rscript {0}

DESCRIPTION

@@ -1,5 +1,5 @@
 Package: EBASE
-Title: Estuarine Bayesian Single-station Estimation Method for Ecosystem Metabolism
+Title: Estuarine Bayesian Single-Station Estimation Method for Ecosystem Metabolism
 Version: 0.0.0.9000
 Date: 2022-03-24
 Authors@R: c(
@@ -50,7 +50,8 @@ Imports:
   R2jags,
   tidyr
 Suggests:
-  doParallel
+    testthat (>= 3.0.0),
+    doParallel
 Remotes:
   jmarriola/fwoxy
 License: CC0
@@ -61,3 +62,4 @@ URL: https://github.com/fawda123/EBASE
 BugReports: https://github.com/fawda123/EBASE/issues
 LazyData: true
 LazyDataCompression: xz
+Config/testthat/edition: 3

tests/testthat.R

@@ -0,0 +1,4 @@
+library(testthat)
+library(EBASE)
+
+test_check("EBASE")

tests/testthat/test-ebase_prep.R

@@ -0,0 +1,7 @@
+test_that("Checking ebase_prep names", {
+  result <- ebase_prep(exdat, H = 1.85) %>% 
+    names
+
+  expect_equal(result, c("Date", "DateTimeStamp", "DO_obs", "DO_sat", "H", "Temp", "Sal", 
+                         "PAR", "WSpd", "sc"))
+})