Remove plot.gtable and print.gtable

NAMESPACE

@@ -1,7 +1,5 @@
 # Generated by roxygen2: do not edit by hand
 
-S3method(plot,gtable)
-S3method(print,gtable)
 export("%>%")
 export("%~%")
 export(.CohortSizeConst)
@@ -524,7 +522,6 @@ importFrom(graphics,lines)
 importFrom(graphics,matlines)
 importFrom(graphics,matplot)
 importFrom(graphics,plot)
-importFrom(grid,grid.draw)
 importFrom(grid,grid.newpage)
 importFrom(grid,pushViewport)
 importFrom(grid,viewport)

R/helpers.R

@@ -241,26 +241,6 @@ crmPackHelp <- function() {
   utils::help(package = "crmPack", help_type = "html")
 }
 
-
-## this is the new version, working on the gtable objects:
-##' Plots gtable objects
-##'
-##' @method plot gtable
-##' @param x the gtable object
-##' @param \dots additional parameters for \code{\link[grid]{grid.draw}}
-##'
-##' @importFrom grid grid.draw
-##' @export
-plot.gtable <- function(x, ...) {
-  grid::grid.draw(x, ...)
-}
-
-##' @export
-print.gtable <- function(x, ...) {
-  plot.gtable(x, ...)
-}
-
-
 #' Multiple plot function
 #'
 #' ggplot objects can be passed in ..., or to plotlist (as a list of ggplot objects).