add shinytest2 for testing run example and draft yaml for deploy

.Rbuildignore

@@ -7,3 +7,4 @@
 ^pkgdown$
 ^\.github$
 ^LICENSE\.md$
+_\.new\.png$

.github/workflows/showcase-deploy.yaml

@@ -0,0 +1,39 @@
+on:
+  push:
+    branches:
+      - main
+      - master
+
+name: Showcase app deploy
+
+jobs:
+  deployShiny:
+    runs-on: ubuntu-latest
+
+    env:
+      GITHUB_PAT: ${{ secrets.GITHUB_TOKEN }}
+
+    steps:
+      - uses: actions/checkout@v4
+
+      - uses: r-lib/actions/setup-r@v2
+        with:
+          use-public-rspm: true
+
+      - name: Load package
+        shell: Rscript {0}
+        run: |
+          devtools::load_all()
+
+      - name: Install rsconnect
+        shell: Rscript {0}
+        run: |
+          if (!requireNamespace("renv", quietly = TRUE)) install.packages("renv")
+          renv::install("rsconnect")
+
+      - name: Push to shinyapps.io
+        run: >
+          Rscript
+          -e "rsconnect::setAccountInfo(name = 'department-for-education', token = '${{secrets.SHINYAPPS_TOKEN}}', secret = '${{secrets.SHINYAPPS_SECRET}}')"
+          -e "shiny_app <- run_example()"
+          -e "rsconnect::deployApp(shiny_app, forceUpdate = TRUE)"

.gitignore

@@ -3,3 +3,5 @@
 .RData
 .DS_Store
 docs/
+# {shinytest2}: Ignore new debug snapshots for `$expect_values()`
+*_.new.png

DESCRIPTION

@@ -27,6 +27,7 @@ Imports:
     shinyjs,
     stringr
 Suggests:
-    testthat
+    testthat,
+    shinytest2
 Encoding: UTF-8
 RoxygenNote: 7.3.2