Add @method annotations

NAMESPACE

@@ -8,7 +8,6 @@ S3method(knit_print,CohortSizeOrdinal)
 S3method(knit_print,CohortSizeParts)
 S3method(knit_print,CohortSizeRange)
 S3method(knit_print,DADesign)
-S3method(knit_print,DataParts)
 S3method(knit_print,Design)
 S3method(knit_print,DesignGrouped)
 S3method(knit_print,DesignOrdinal)

R/helpers_knitr_CohortSize.R

@@ -30,6 +30,7 @@ NULL
 #' @seealso [`knit_print`] for more details.
 #'
 #' @export
+#' @method knit_print CohortSizeConst
 #' @rdname knit_print
 knit_print.CohortSizeConst <- function(x, ..., asis = TRUE, label = c("participant", "participants")) {
   assert_flag(asis)
@@ -53,6 +54,7 @@ knit_print.CohortSizeConst <- function(x, ..., asis = TRUE, label = c("participa
 #' These values can be overridden by passing `col.names` and `caption` in the
 #' function call.
 #' @export
+#' @method knit_print CohortSizeRange
 #' @rdname knit_print
 knit_print.CohortSizeRange <- function(x, ..., asis = TRUE) {
   assert_flag(asis)
@@ -91,6 +93,7 @@ knit_print.CohortSizeRange <- function(x, ..., asis = TRUE) {
 #'  function call.
 #'
 #' @export
+#' @method knit_print CohortSizeDLT
 #' @rdname knit_print
 knit_print.CohortSizeDLT <- function(x, ..., tox_label = "toxicity", asis = TRUE) {
   assert_flag(asis)
@@ -125,6 +128,7 @@ knit_print.CohortSizeDLT <- function(x, ..., tox_label = "toxicity", asis = TRUE
 #' @inheritSection knit_print.CohortSizeConst Usage Notes
 #'
 #' @export
+#' @method knit_print CohortSizeParts
 #' @rdname knit_print
 knit_print.CohortSizeParts <- function(x, ..., asis = TRUE, label = c("participant", "participants")) {
   assert_flag(asis)
@@ -155,6 +159,7 @@ knit_print.CohortSizeParts <- function(x, ..., asis = TRUE, label = c("participa
 #' rules
 #'
 #' @export
+#' @method knit_print CohortSizeMax
 #' @rdname knit_print
 knit_print.CohortSizeMax <- function(x, ..., asis = TRUE) {
   assert_flag(asis)
@@ -190,6 +195,7 @@ knit_print.CohortSizeMax <- function(x, ..., asis = TRUE) {
 #' rules
 #'
 #' @export
+#' @method knit_print CohortSizeMin
 #' @rdname knit_print
 knit_print.CohortSizeMin <- function(x, ..., asis = TRUE) {
   assert_flag(asis)
@@ -220,6 +226,7 @@ knit_print.CohortSizeMin <- function(x, ..., asis = TRUE) {
 #' @param ... passed through to the `knit_print` method of the standard rule
 #'
 #' @export
+#' @method knit_print CohortSizeOrdinal
 #' @rdname knit_print
 knit_print.CohortSizeOrdinal <- function(x, ..., tox_label = "toxicity", asis = TRUE) {
   assert_flag(asis)

R/helpers_knitr_GeneralData.R

@@ -321,6 +321,7 @@ h_knit_print_summarise.DataGrouped <- function(x, summarise, full_grid, ...) {
 #'
 #' @inheritParams h_get_formatted_dosegrid
 #' @export
+#' @method knit_print GeneralData
 #' @rdname knit_print
 knit_print.GeneralData <- function(
     x, ..., asis = TRUE,
@@ -384,6 +385,7 @@ knit_print.GeneralData <- function(
 }
 
 #' @export
+#' @method knit_print GeneralData
 #' @rdname knit_print
 knit_print.DataParts <- function(
     x, ..., asis = TRUE,

R/helpers_knitr_Increments.R

@@ -14,6 +14,7 @@
 #' values can be overridden by passing `col.names` and `caption` in the function
 #' call.
 #' @export
+#' @method knit_print IncrementsRelative
 #' @rdname knit_print
 knit_print.IncrementsRelative <- function(x, ..., asis = TRUE) {
   assert_flag(asis)
@@ -50,6 +51,7 @@ knit_print.IncrementsRelative <- function(x, ..., asis = TRUE) {
 #' of `caption` is `"Defined by number of DLTs reported so far"`. These values
 #' can be overridden by passing `col.names` and `caption` in the function call.
 #' @export
+#' @method knit_print IncrementsRelativeDLT
 #' @rdname knit_print
 knit_print.IncrementsRelativeDLT <- function(x, ..., asis = TRUE) {
   assert_flag(asis)
@@ -83,6 +85,7 @@ knit_print.IncrementsRelativeDLT <- function(x, ..., asis = TRUE) {
 #' @inheritParams knit_print.CohortSizeConst
 #' @export
 #' @rdname knit_print
+#' @method knit_print IncrementsDoseLevels
 knit_print.IncrementsDoseLevels <- function(x, ..., asis = TRUE) {
   assert_flag(asis)
 
@@ -107,6 +110,7 @@ knit_print.IncrementsDoseLevels <- function(x, ..., asis = TRUE) {
 #' @inherit knit_print.CohortSizeConst return
 #' @inheritParams knit_print.CohortSizeConst
 #' @export
+#' @method knit_print IncrementsHSRBeta
 #' @rdname knit_print
 knit_print.IncrementsHSRBeta <- function(x, ..., asis = TRUE) {
   assert_flag(asis)
@@ -135,6 +139,7 @@ knit_print.IncrementsHSRBeta <- function(x, ..., asis = TRUE) {
 #' rules
 #' @inheritParams knit_print.CohortSizeConst
 #' @export
+#' @method knit_print IncrementsMin
 #' @rdname knit_print
 knit_print.IncrementsMin <- function(x, ..., asis = TRUE) {
   assert_flag(asis)
@@ -165,6 +170,7 @@ knit_print.IncrementsMin <- function(x, ..., asis = TRUE) {
 #' @param ... passed through to the `knit_print` method of the standard rule
 #' @inheritParams knit_print.CohortSizeConst
 #' @export
+#' @method knit_print IncrementsOrdinal
 #' @rdname knit_print
 knit_print.IncrementsOrdinal <- function(x, ..., asis = TRUE) {
   assert_flag(asis)
@@ -199,6 +205,7 @@ knit_print.IncrementsOrdinal <- function(x, ..., asis = TRUE) {
 #' describing a single toxicity.
 #'
 #' @export
+#' @method knit_print IncrementsRelativeParts
 #' @rdname knit_print
 knit_print.IncrementsRelativeParts <- function(x, ..., asis = TRUE, tox_label = c("toxicity", "toxicities")) {
   assert_flag(asis)
@@ -284,6 +291,7 @@ knit_print.IncrementsRelativeParts <- function(x, ..., asis = TRUE, tox_label =
 #' describing a single toxicity.
 #'
 #' @export
+#' @method knit_print IncrementsRelativeDLTCurrent
 #' @rdname knit_print
 knit_print.IncrementsRelativeDLTCurrent <- function(
     x,