tests/testthat/test_document.R

In BIDMCDigitalPsychiatry/LAMP-r: API Client for LAMP Platform

# Automatically generated
# Please update as you see appropriate

context("Test Document")

model.instance <- Document$new()

test_that("meta", {
  # tests for the property `meta` (Metadata)

  # uncomment below to test the property 
  #expect_equal(model.instance$`meta`, "EXPECTED_RESULT")
})

test_that("data", {
  # tests for the property `data` (array[object])

  # uncomment below to test the property 
  #expect_equal(model.instance$`data`, "EXPECTED_RESULT")
})