Comunicando com Dados no Tidyverse
Timo Grossenbacher
Data Journalist


ggplot(plot_data) +
geom_histogram(aes(
x = working_hours)) +
labs(x = "Working hours per week",
y = "Number of countries") +
theme(
text = element_text(
family = "Bookman",
color = "gray25")
)

ggplot(plot_data) +
geom_histogram(aes(
x = working_hours)) +
labs(x = "Working hours per week",
y = "Number of countries") +
theme_classic()

ggplot(plot_data) +
geom_histogram(aes(
x = working_hours)) +
labs(x = "Working hours per week",
y = "Number of countries") +
theme_classic() +
theme(
text = element_text(
family = "Bookman",
color = "gray25")
)

?theme
axis.title
rótulo dos eixos (element_text; herda de text)
axis.title.x
rótulo do eixo x (element_text; herda de axis.title)
axis.title.x.top
rótulo do eixo x no topo (element_text; herda de axis.title.x)
axis.title.x.bottom
rótulo do eixo x na base (element_text; herda de axis.title.x)
element_text()
element_rect()
element_line()
element_blank()
ggplot(plot_data) +
geom_histogram(aes(
x = working_hours)) +
labs(x = "Working hours per week",
y = "Number of countries") +
theme(
text = element_blank()
)

Comunicando com Dados no Tidyverse