From 978bc9339fdc762fdefa1a453ad5c49dcb922d52 Mon Sep 17 00:00:00 2001
From: Collin Luebbert <47461392+cluebbert@users.noreply.github.com>
Date: Thu, 13 Nov 2025 11:28:45 -0600
Subject: [PATCH 1/2] Create r.yml

---
 .github/workflows/r.yml | 40 ++++++++++++++++++++++++++++++++++++++++
 1 file changed, 40 insertions(+)
 create mode 100644 .github/workflows/r.yml

diff --git a/.github/workflows/r.yml b/.github/workflows/r.yml
new file mode 100644
index 0000000..ed8aacf
--- /dev/null
+++ b/.github/workflows/r.yml
@@ -0,0 +1,40 @@
+# This workflow uses actions that are not certified by GitHub.
+# They are provided by a third-party and are governed by
+# separate terms of service, privacy policy, and support
+# documentation.
+#
+# See https://github.com/r-lib/actions/tree/master/examples#readme for
+# additional example workflows available for the R community.
+
+name: R
+
+on:
+  push:
+    branches: [ "main" ]
+  pull_request:
+    branches: [ "main" ]
+
+permissions:
+  contents: read
+
+jobs:
+  build:
+    runs-on: macos-latest
+    strategy:
+      matrix:
+        r-version: ['3.6.3', '4.1.1']
+
+    steps:
+      - uses: actions/checkout@v4
+      - name: Set up R ${{ matrix.r-version }}
+        uses: r-lib/actions/setup-r@f57f1301a053485946083d7a45022b278929a78a
+        with:
+          r-version: ${{ matrix.r-version }}
+      - name: Install dependencies
+        run: |
+          install.packages(c("remotes", "rcmdcheck"))
+          remotes::install_deps(dependencies = TRUE)
+        shell: Rscript {0}
+      - name: Check
+        run: rcmdcheck::rcmdcheck(args = "--no-manual", error_on = "error")
+        shell: Rscript {0}

From 774ccf909bfa281ad3972f53e9d017cd445d5db1 Mon Sep 17 00:00:00 2001
From: cluebbert <47461392+cluebbert@users.noreply.github.com>
Date: Thu, 13 Nov 2025 11:48:44 -0600
Subject: [PATCH 2/2] Update utility_panvar_gwas.r

---
 R/utility_panvar_gwas.r | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/R/utility_panvar_gwas.r b/R/utility_panvar_gwas.r
index 086344a..cafbdeb 100644
--- a/R/utility_panvar_gwas.r
+++ b/R/utility_panvar_gwas.r
@@ -23,7 +23,7 @@
 #' # panvar_gwas("path/to/genotype_data.vcf", "path/to/phenotype_data.csv", pc_min = 5, pc_max = 5, maf = 0.05, missing_rate = 0.1)
 #' # Using data.table object
 #' #pheno_dt <- data.table::fread("path/to/phenotype_data.csv")
-#' p#anvar_gwas("path/to/genotype_data.vcf", pheno_dt, pc_min = 5, pc_max = 5, maf = 0.05, missing_rate = 0.1)
+#' #panvar_gwas("path/to/genotype_data.vcf", pheno_dt, pc_min = 5, pc_max = 5, maf = 0.05, missing_rate = 0.1)
 #'
 #' @import tidyverse
 #' @import data.table