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
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
|
% Generated by roxygen2: do not edit by hand
% Please edit documentation in R/stamp.R
\name{stamp}
\alias{stamp}
\alias{stamp_good}
\alias{stamp_bad}
\alias{stamp_wrong}
\alias{stamp_ugly}
\title{Stamp plots with a label, such as good, bad, or ugly.}
\usage{
stamp(
p,
label,
color = "black",
alpha = 1,
vjust = 1.1,
hjust = 1,
size = 14,
family = "",
fontface = "bold",
clip = "on",
colour
)
stamp_good(p, ...)
stamp_bad(p, ...)
stamp_wrong(p, ...)
stamp_ugly(p, ...)
}
\arguments{
\item{p}{The plot to stamp}
\item{label}{The text label used for the stamp}
\item{color, colour}{The color of the stamp}
\item{alpha}{Transparency level of the stamp}
\item{hjust, vjust}{Horizontal and vertical adjustment of the label}
\item{size}{Font size}
\item{family}{Font family}
\item{fontface}{Font face}
\item{clip}{Should figure be clipped (default is "on")}
\item{...}{Arguments handed off to \code{stamp()}.}
}
\description{
Stamp plots with a label, such as good, bad, or ugly.
}
\examples{
library(ggplot2)
p <- ggplot(iris, aes(x = Sepal.Length, y = Sepal.Width)) +
geom_point(aes(color = factor(Petal.Width)))
stamp_bad(p + guides(color = "none"))
stamp_ugly(p)
}
|
