From 4130d55378c5cf6766ea582393389e10f2741b7e Mon Sep 17 00:00:00 2001
From: Steven Maude <git@stevenmaude.co.uk>
Date: Wed, 15 May 2024 15:50:13 +0100
Subject: [PATCH] WIP: Add placeholder R check commented out

---
 tests/dev_container.sh | 7 +++++++
 1 file changed, 7 insertions(+)

diff --git a/tests/dev_container.sh b/tests/dev_container.sh
index 6fe6971..eb4f7c7 100755
--- a/tests/dev_container.sh
+++ b/tests/dev_container.sh
@@ -7,6 +7,13 @@ set -euxo pipefail
 # Check the OpenSAFELY research-template example runs.
 opensafely run run_all
 
+# Check the R packages.
+#opensafely_r_packages=$(curl -s https://raw.githubusercontent.com/opensafely-core/r-docker/main/renv.lock |
+#    jq  '.Packages | keys')
+#r_installed=$(Rscript -e 'installed_packages <- as.data.frame(installed.packages()[,c(1,3:4)])' \
+#    -e 'package_names<-unique(installed_packages[installed_packages$Priority!="base"|is.na(installed_packages$Priority),,drop=FALSE][["Package"]])'
+#    -e 'cat(package_names[! package_names %in% c("docopt","spatial","littler")],sep="\n")')
+
 # Check the Python packages are as the Python image from which they are taken.
 python_image_version="v2"
 opensafely pull "python:$python_image_version"