tests/testthat/test_researcher.R

# Automatically generated
# Please update as you see appropriate

context("Test Researcher")

model.instance <- Researcher$new()

test_that("id", {
  # tests for the property `id` (character)
  # A globally unique reference for objects.

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

test_that("name", {
  # tests for the property `name` (character)
  # The name of the researcher.

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

test_that("email", {
  # tests for the property `email` (character)
  # The email address of the researcher.

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

test_that("address", {
  # tests for the property `address` (character)
  # The physical address of the researcher.

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

test_that("studies", {
  # tests for the property `studies` (array[object])
  # The set of all studies conducted by the researcher.

  # uncomment below to test the property 
  #expect_equal(model.instance$`studies`, "EXPECTED_RESULT")
})
BIDMCDigitalPsychiatry/LAMP-r documentation built on April 29, 2020, 9:51 a.m.