tests/testthat/fixtures/test_class.R

#' A Test R6 Class
#'
TestClass <- R6::R6Class( # nolint: object_name_linter
  "TestClass",
  public = list(
    #' @field field A field
    field = NULL,

    #' @description
    #' Initialize a new `TestClass` object
    initialize = function(field) {
      self$field <- field
    }
  )
)

Try the admiraldev package in your browser

Any scripts or data that you put into this service are public.

admiraldev documentation built on Jan. 14, 2026, 9:09 a.m.