ggpmisc (version 0.3.2)

scale_colour_outcome: Colour and fill scales for ternary outcomes

Description

Manual scales for colour and fill aesthetics with defaults suitable for the three way outcome from some statistical tests.

Usage

scale_colour_outcome(..., name = "Outcome", ns.colour = "grey80",
  up.colour = "red", down.colour = "dodgerblue2",
  de.colour = "goldenrod", na.colour = "black",
  aesthetics = "colour")
scale_fill_outcome(..., name = "Outcome", ns.colour = "grey80",
  up.colour = "red", down.colour = "dodgerblue2",
  de.colour = "goldenrod", na.colour = "black", aesthetics = "fill")

Arguments

...

other named arguments passed to scale_manual.

name

The name of the scale, used for the axis-label.

ns.colour, down.colour, up.colour, de.colour

The colour defintions to use for each of the three possible outcomes.

na.colour

colour definition used for NA.

aesthetics

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").

Details

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.

See Also

Other Functions for quadrant and volcano plots: FC_format, geom_quadrant_lines, outcome2factor, scale_shape_outcome, scale_y_Pvalue, stat_quadrant_counts, xy_outcomes2factor

Examples

# NOT RUN {
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()

# }