Learn R Programming

ggthemes (version 3.4.0)

theme_economist: ggplot color theme based on the Economist

Description

Style plots similar to those in The Economist.

Usage

theme_economist(base_size = 10, base_family = "sans", horizontal = TRUE,
  dkpanel = FALSE, stata = FALSE)

theme_economist_white(base_size = 11, base_family = "sans", gray_bg = TRUE, horizontal = TRUE)

Arguments

base_size

base font size

base_family

base font family

horizontal

logical. Horizontal axis lines?

dkpanel

logical Darker background for panel region?

stata

logical Use RGB values from Stata's economist scheme.

gray_bg

logical If TRUE, use gray background, else use white background.

Value

An object of class theme.

Details

theme_economist implements the standard bluish-gray background theme in the print The Economist and economist.com. theme_economist_white implements a variant with a while panel and light gray (or white) background used by The Economist blog Graphic Detail.

The Economist uses "ITC Officina Sans" as its font for graphs. If you have access to this font, you can use it with the extrafont package. "Verdana" is a good substitute.

References

See Also

theEconomist.theme for an Economist theme for lattice plots.

Examples

Run this code
# NOT RUN {
library("ggplot2")
p <- ggplot(mtcars) + geom_point(aes(x = wt, y = mpg,
     colour=factor(gear))) +
     facet_wrap(~am) +
     # Economist puts scales on the right-hand side
     scale_y_continuous(position = "right")


## Standard
p + theme_economist() + scale_colour_economist()

## Stata colors
p + theme_economist(stata=TRUE) + scale_colour_economist(stata=TRUE)

## Darker plot region
p + theme_economist(dkpanel=TRUE) + scale_colour_economist(stata=TRUE)

# Change axis lines to vertical
p + theme_economist(horizontal=FALSE) +
    scale_colour_economist() +
    coord_flip()

## White panel/light gray background
p + theme_economist_white() +
    scale_colour_economist()

## All white variant
p + theme_economist_white(gray_bg=FALSE) +
    scale_colour_economist()
# }
# NOT RUN {
## The Economist uses ITC Officina Sans
library(extrafont)
p + theme_economist(base_family="ITC Officina Sans") +
    scale_colour_economist()

## Verdana is a widely available substitute
p + theme_economist(base_family="Verdana") +
    scale_colour_economist()
# }

Run the code above in your browser using DataLab