andreas/REDCapCAST
1
0
Fork 0
mirror of https://github.com/agdamsbo/REDCapCAST.git synced 2026-06-21 05:59:07 +02:00
Code Issues Projects Releases Packages Wiki Activity

trying to overcome error messagein github actions by moving R package to root.

Browse source
This commit is contained in:
AG Damsbo 2022-12-21 08:29:00 +01:00
commit 582a481942
33 changed files with 1 additions and 1276 deletions
Download patch file Download diff file Expand all files Collapse all files

26
tests/testthat/test-API.R Normal file
View file

@ -0,0 +1,26 @@
context("Reading in JSON")
# Check the RCurl export ---------------------------------------------------
test_that("JSON character vector from RCurl matches reference", {
metadata <- jsonlite::fromJSON(
get_data_location(
"ExampleProject_metadata.json"
)
)
records <- jsonlite::fromJSON(
get_data_location(
"ExampleProject_records.json"
)
)
redcap_output_json1 <- REDCap_split(records, metadata)
expect_known_hash(redcap_output_json1, "2c8b6531597182af1248f92124161e0c")
})
# Check the httr export ---------------------------------------------------
# Something will go here.