1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
|
#' Plot templates.
#'
#' These plot templates are deprecated in an attempt to make ggplot2 as
#' streamlined as possible, and to avoid bugs in these poorly tested
#' functions. See the \pkg{GGally} package for some alternatives.
#'
#' @name plot-templates
#' @keywords internal
NULL
#' @export
#' @rdname plot-templates
ggpcp <- function(data, vars=names(data), ...) {
gg_dep("0.9.1", "ggpcp")
}
#' @export
#' @rdname plot-templates
ggfluctuation <- function(table, type="size", floor=0, ceiling=max(table$freq, na.rm=TRUE)) {
gg_dep("0.9.1", "ggfluctuation")
}
#' @export
#' @rdname plot-templates
ggmissing <- function(data, avoid="stack", order=TRUE, missing.only = TRUE) {
gg_dep("0.9.1", "ggmissing")
}
#' @export
#' @rdname plot-templates
ggstructure <- function(data) {
gg_dep("0.9.1", "ggstructure")
}
#' @export
#' @rdname plot-templates
ggorder <- function(data) {
gg_dep("0.9.1", "ggorder")
}
#' @export
#' @rdname plot-templates
plotmatrix <- function(data, mapping=aes(), colour="black") {
gg_dep("0.9.2", "Please use GGally::ggpairs.")
}
|
