R/plotDoseResponse.R

-#' Plot dose-response from raw data
-#' 
-#' Plots the response of the effect as a function of the concentration at a given
-#' target time.
-#' 
-#' @param x an object used to select a method \code{plotDoseRespons}
-#' @param \dots Further arguments to be passed to generic methods
-
-#' @export
-plotDoseResponse <- function(x, ...){
-  UseMethod("plotDoseResponse")
-}
+#' Plot dose-response from raw data
+#' 
+#' Plots the response of the effect as a function of the concentration at a given
+#' target time.
+#' 
+#' @param x an object used to select a method \code{plotDoseRespons}
+#' @param \dots Further arguments to be passed to generic methods
+#' 
+#' @return a plot of class \code{ggplot}
+#' 
+#' @export
+plotDoseResponse <- function(x, ...){
+  UseMethod("plotDoseResponse")
+}

R/ppc.R

-#' Posterior predictive check plot
-#' 
-#' Plots posterior predictive check for \code{reproFitTT}, \code{survFitTT},
-#'  \code{survFitTKTD}, \code{survFitCstExp} and \code{survFitVarExp} objects.
-#' 
-#' Depending on the class of the object \code{x} see their links. 
-#' for class \code{reproFitTT}: \link[=ppc.reproFitTT]{ppc.reproFitTT} ;  
-#' for class \code{survFitTT}: \link[=ppc.survFitTT]{ppc.survFitTT} ; 
-#' for class \code{survFitTKTD}: \link[=ppc.survFitTKTD]{ppc.survFitTKTD} ;
-#' for class \code{survFitCstExp}: \link[=ppc.survFitCstExp]{ppc.survFitCstExp} and
-#' for class \code{survFitVarExp}: \link[=ppc.survFitVarExp]{ppc.survFitVarExp}.
-#' 
-#' @rdname PPC
-#' 
-#' @param x an object used to select a method \code{ppc}
-#' @param \dots Further arguments to be passed to generic methods
-#' 
-#' @export
-ppc <- function(x, ...){
-  UseMethod("ppc")
+#' Posterior predictive check plot
+#' 
+#' Plots posterior predictive check for \code{reproFitTT}, \code{survFitTT},
+#'  \code{survFitTKTD}, \code{survFitCstExp} and \code{survFitVarExp} objects.
+#' 
+#' Depending on the class of the object \code{x} see their links. 
+#' for class \code{reproFitTT}: \link[=ppc.reproFitTT]{ppc.reproFitTT} ;  
+#' for class \code{survFitTT}: \link[=ppc.survFitTT]{ppc.survFitTT} ; 
+#' for class \code{survFitTKTD}: \link[=ppc.survFitTKTD]{ppc.survFitTKTD} ;
+#' for class \code{survFitCstExp}: \link[=ppc.survFitCstExp]{ppc.survFitCstExp} and
+#' for class \code{survFitVarExp}: \link[=ppc.survFitVarExp]{ppc.survFitVarExp}.
+#' 
+#' @rdname PPC
+#' 
+#' @return a plot of class \code{ggplot}
+#' 
+#' @param x an object used to select a method \code{ppc}
+#' @param \dots Further arguments to be passed to generic methods
+#' 
+#' @export
+ppc <- function(x, ...){
+  UseMethod("ppc")
 }
\ No newline at end of file