Add ci for r + better docs

.github/workflows/ci.yml

@@ -54,3 +54,18 @@ jobs:
         run: pip install ruff
       - name: Run ruff
         run: ruff check python/remotebmi
+
+  r:
+    runs-on: ubuntu-latest
+    steps:
+      - name: Checkout code
+        uses: actions/checkout@v4
+      - name: Setup R
+        uses: r-lib/actions/setup-r@v2
+      - uses: r-lib/actions/setup-r-dependencies@v2
+        with:
+          extra-packages: any::rcmdcheck
+          needs: check
+        working-directory: R/remotebmi
+      - uses: r-lib/actions/check-r-package@v2
+        working-directory: R/remotebmi

R/remotebmi/R/route.R

@@ -1,7 +1,7 @@
 
 
 last_segment <- function(path) {
-    # keys get toLower at https://github.com/thomasp85/routr/blob/8605611a10607016a83660f83f310075787a27b2/R/route.R#L250
+    # keys values are lowercase at https://github.com/thomasp85/routr/blob/8605611a10607016a83660f83f310075787a27b2/R/route.R#L250
     # need untouched version
     segments <- unlist(strsplit(path, '/'))
     return(segments[length(segments)])
@@ -23,7 +23,6 @@ last_segment <- function(path) {
 #'   route <- create_route(model)
 #' }
 #'
-#' @export
 create_route <- function(model) {
     bmi_initialize <- function(request, response, keys, ...) {
         request$parse(json = reqres::parse_json())