Skip to content


Subversion checkout URL

You can clone with HTTPS or Subversion.

Download ZIP
Fetching contributors…

Cannot retrieve contributors at this time

31 lines (26 sloc) 1.147 kb
#' Identity statistic.
#' @param mapping The aesthetic mapping, usually constructed with
#' \code{\link{aes}} or \code{\link{aes_string}}. Only needs to be set
#' at the layer level if you are overriding the plot defaults.
#' @param data A layer specific dataset - only needed if you want to override
#' the plot defaults.
#' @param geom The geometric object to use display the data
#' @param position The position adjustment to use for overlappling points
#' on this layer
#' @param ... other arguments passed on to \code{\link{layer}}. This can
#' include aesthetics whose values you want to set, not map. See
#' \code{\link{layer}} for more details.
#' @export
#' @examples
#' # Doesn't do anything, so hard to come up a useful example
stat_identity <- function (mapping = NULL, data = NULL, geom = "point", position = "identity", ...) {
StatIdentity$new(mapping = mapping, data = data, geom = geom,
position = position, ...)
StatIdentity <- proto(Stat, {
objname <- "identity"
default_geom <- function(.) GeomPoint
calculate_groups <- function(., data, scales, ...) data
desc_outputs <- list()
Jump to Line
Something went wrong with that request. Please try again.