knitr::opts_chunk$set(echo = TRUE, dpi = 300)
petgg
é um tema para o pacote ggplot2
Primeiro instale o pacote devtools
. Para usuários Windows é necessário instalar o RTools antes.
# install.packages("devtools") devtools::install_github("peteconomia/petgg")
Sempre carrege o pacote depois de ggplot2
ou tidyverse
.
library(ggplot2) library(petgg)
A função petgg::set_theme()
aplica o tema.
petgg::set_theme() ggplot(mpg) + geom_point(aes(x = displ, y = hwy, color = class))
Para voltar ao tema inicial use petgg::reset()
Por padrão o tema não mostra o nome dos eixos e título da legenda. Espaço ao redor do gráfico foi removido para aumentar a visibilidade
base_size
argumento controla o tamanho da fonte em pts
.
numeric
Padrão é
12
petgg::set_theme(base_size = 22) # big !!!! ggplot(mpg) + geom_point(aes(x = displ, y = hwy, color = class))
base_family
é a família da fonte.
character
Padrão é
"EB Garamond"
Para listar todas as fontes disponíveis que você pode utilizar:
names(pdfFonts())
petgg::set_theme(base_family = "Courier") ggplot(diamonds) + geom_bar(aes(x = cut, fill = clarity), position = "dodge") + labs(title = "Courier Fonte")
load_font
argumento carrega fontes pelo pacote extrafont
. Padrão é TRUE
. Para importar fontes execute extrafont::font_import(prompt = FALSE)
axis_title
argumento controla a visibilidade dos nomes dos eixos
logical
Padrão é
FALSE
petgg::set_theme(axis_title = TRUE) ggplot(diamonds, aes(depth, color = cut)) + geom_density()
legend_title
argumento controla a visibilidade do título da legenda.
logical
Padrão é
FALSE
petgg::set_theme(legend_title = TRUE) ggplot(diamonds, aes(depth, color = cut)) + geom_density()
legend_position
argumento controla a posição da legenda no gráfico.
character
ounumeric vector
Padrão é
"bottom"
. Pode ser"top"
,"right"
,"bottom"
,"left"
,"none"
ou um par de coordenada, exemploc(0.9, 0.9)
petgg::set_theme(legend_position = "right") ggplot(economics_long, aes(date, value01, colour = variable)) + geom_line()
legend_direction
argumento controla a orientação da legenda.
character
Padrão é
"horizontal"
. Pode ser"vertical"
ou"horizontal"
petgg::set_theme(legend_position = "right", legend_direction = "vertical") ggplot(economics_long, aes(date, value01, colour = variable)) + geom_line()
theme_petgg()
Para aplicar o tema para uma plotagem específica utilize petgg::theme_petgg()
. A função aceita os mesmos argumentos de petgg::set_theme()
ggplot(mpg) + geom_point(aes(x = displ, y = hwy, color = class)) + theme_petgg()
geom_bar
e geom_col
gap
gap
argumento controla o espaço entre as barras. É útil quando as barras são colocada lado a lado (position = "dodge"
) representando um combinação de variáveis e é necessário ganhar espaço.
character
Valores possíveis: "s"
(pequeno), "m"
(médio), "b"
(grande)
petgg::set_theme() ggplot(diamonds) + geom_bar(aes(x = cut, fill = clarity), position = "dodge", gap = "s")
petgg::colors # acessa a paleta de cores padrão do tema
petgg::alpha # transparência padrão do tema
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.