In RichardMeyer-Eppler/studentenstatistikNRW: Student Statistics from the Landesdatenbank NRW (Table Series 21311)

knitr::opts_chunk$set(
  collapse = TRUE,
  comment = "#>"
)

library(studentenstatistikNRW)
library(httr2)

Authentification

• See vignette("wrapping-apis", package = "httr2")

Check whether repository secret is available

httr2::secret_has_key(
  "STUDENTENSTATISTIKNRW_KEY"
)

Test Login for GENESIS-Online

# Using wiesbaden::save_credentials() does not work in automated setting, see https://github.com/r-lib/keyring/issues/68

wiesbaden::test_login(
    genesis = c(
      db = "de",
      user = httr2::secret_decrypt(
        "F7n1i0Z8YhyeDEYjnNaw14KEYzXc3ICfqGw",
        "STUDENTENSTATISTIKNRW_KEY"
      ),
      password = httr2::secret_decrypt(
        "HttWvnmkxOru6VKzxox084iIEv8ZrFIqVXEO",
        "STUDENTENSTATISTIKNRW_KEY"
      )
  )
)

RichardMeyer-Eppler/studentenstatistikNRW documentation built on July 27, 2024, 3:14 a.m.