Manual scales for colour and fill aesthetics with defaults suitable for the three way outcome from some statistical tests.
scale_colour_outcome(
...,
name = "Outcome",
ns.colour = "grey80",
up.colour = "red",
down.colour = "dodgerblue2",
de.colour = "goldenrod",
na.colour = "black",
values = "outcome:updown",
drop = TRUE,
aesthetics = "colour"
)scale_color_outcome(
...,
name = "Outcome",
ns.colour = "grey80",
up.colour = "red",
down.colour = "dodgerblue2",
de.colour = "goldenrod",
na.colour = "black",
values = "outcome:updown",
drop = TRUE,
aesthetics = "colour"
)
scale_fill_outcome(
...,
name = "Outcome",
ns.colour = "grey80",
up.colour = "red",
down.colour = "dodgerblue2",
de.colour = "goldenrod",
na.colour = "black",
values = "outcome:both",
drop = TRUE,
aesthetics = "fill"
)
other named arguments passed to scale_colour_manual
.
The name of the scale, used for the axis-label.
The colour definitions to use for each of the three possible outcomes.
colour definition used for NA.
a set of aesthetic values to map data values to. The values
will be matched in order (usually alphabetical) with the limits of the
scale, or with breaks if provided. If this is a named vector, then the
values will be matched based on the names instead. Data values that don't
match will be given na.value. In addition the special values
"outcome:updown"
, "outcome:de"
and "outcome:both"
set
predefined values, with "outcome:both"
as default.
logical Should unused factor levels be omitted from the scale? The default, TRUE, uses the levels that appear in the data; FALSE uses all the levels in the factor.
Character string or vector of character strings listing the name(s) of the aesthetic(s) that this scale works with. This can be useful, for example, to apply colour settings to the colour and fill aesthetics at the same time, via aesthetics = c("colour", "fill").
These scales only alter the breaks
, values
, and
na.value
default arguments of scale_colour_manual()
and
scale_fill_manual()
. Please, see documentation for
scale_manual
for details.
Other Functions for quadrant and volcano plots:
FC_format()
,
outcome2factor()
,
scale_shape_outcome()
,
scale_y_Pvalue()
,
xy_outcomes2factor()
set.seed(12346)
outcome <- sample(c(-1, 0, +1), 50, replace = TRUE)
my.df <- data.frame(x = rnorm(50),
y = rnorm(50),
outcome2 = outcome2factor(outcome, n.levels = 2),
outcome3 = outcome2factor(outcome))
ggplot(my.df, aes(x, y, colour = outcome3)) +
geom_point() +
scale_colour_outcome() +
theme_bw()
ggplot(my.df, aes(x, y, colour = outcome2)) +
geom_point() +
scale_colour_outcome() +
theme_bw()
ggplot(my.df, aes(x, y, fill = outcome3)) +
geom_point(shape = 21) +
scale_fill_outcome() +
theme_bw()
Run the code above in your browser using DataLab