travis

NAMESPACE

@@ -11,7 +11,6 @@ export(GeomBkde)
 export(GeomBkde2d)
 export(GeomEncircle)
 export(GeomStateface)
-export(GeomTable)
 export(GeomXSpline2)
 export(GeomXspline)
 export(Kb)

R/geom_table.r

@@ -1,7 +1,7 @@
-#' @rdname ggalt-ggproto
-#' @format NULL
-#' @usage NULL
-#' @export
+# @rdname ggalt-ggproto
+# @format NULL
+# @usage NULL
+# @export
 GeomTable <- ggproto(
   "GeomTable",
   Geom,
@@ -75,9 +75,9 @@ facet_id <- local({
   }
 })
 
-#' Add a table to a ggplot2 plot
-#'
-#' @author Jan Schulz
+# Add a table to a ggplot2 plot
+#
+# @author Jan Schulz
 geom_table <- function(mapping = NULL, data = NULL, stat = "identity",
                        position = "identity", na.rm = FALSE,
                        show.legend = NA, inherit.aes = TRUE, ...) {

R/stateface.r

@@ -136,6 +136,9 @@ GeomStateface <- ggproto("GeomStateface", Geom,
 
   draw_panel = function(data, panel_scales, coord, parse = FALSE,
                        na.rm = FALSE, check_overlap = FALSE) {
+
+   load_stateface
+
    lab <- data$label
 
    if (max(sapply(lab, nchar)) == 2) {

R/zzz.r

@@ -2,8 +2,6 @@
 
   if (!interactive()) return()
 
-  load_stateface()
-
   packageStartupMessage(paste0("ggalt is under *active* development. ",
                                "See https://github.com/hrbrmstr/ggalt for changes"))
 

man/geom_table.Rd

@@ -1,17 +0,0 @@
-% Generated by roxygen2: do not edit by hand
-% Please edit documentation in R/geom_table.r
-\name{geom_table}
-\alias{geom_table}
-\title{Add a table to a ggplot2 plot}
-\usage{
-geom_table(mapping = NULL, data = NULL, stat = "identity",
-  position = "identity", na.rm = FALSE, show.legend = NA,
-  inherit.aes = TRUE, ...)
-}
-\description{
-Add a table to a ggplot2 plot
-}
-\author{
-Jan Schulz
-}
-

man/ggalt-ggproto.Rd

@@ -1,5 +1,5 @@
 % Generated by roxygen2: do not edit by hand
-% Please edit documentation in R/coord_proj.r, R/geom_ash.r, R/geom_bkde.r, R/geom_bkde2d.r, R/geom_encircle.r, R/geom_table.r, R/geom_xspline.r, R/geom_xspline2.r, R/stateface.r
+% Please edit documentation in R/coord_proj.r, R/geom_ash.r, R/geom_bkde.r, R/geom_bkde2d.r, R/geom_encircle.r, R/geom_xspline.r, R/geom_xspline2.r, R/stateface.r
 \docType{data}
 \name{CoordProj}
 \alias{CoordProj}
@@ -7,7 +7,6 @@
 \alias{GeomBkde2d}
 \alias{GeomEncircle}
 \alias{GeomStateface}
-\alias{GeomTable}
 \alias{GeomXSpline2}
 \alias{GeomXspline}
 \alias{StatAsh}