Definiera din egen temafunktion
I videon såg du hur mycket kod som kan sparas genom att ersätta kodblock med funktionsanrop. Du lärde dig hur en funktion vanligtvis definieras – nu ska du tillämpa den kunskapen för att göra dina tidigare två theme()-anrop återanvändbara.
Den här övningen är en del av kursen
Kommunicera med data i Tidyverse
Övningsinstruktioner
- Skapa med hjälp av dina nya kunskaper om funktionsdefinitioner en funktion som heter
theme_ilo()och som samlar dina temainställningar. - Funktionskroppen ska innehålla båda
theme()-anropen som du annars skulle tillämpa direkt på ett plotobjekt:theme_minimal()+ din anpassadetheme()-funktion. - Kopiera det du gjorde tidigare in i funktionen
theme_ilo(), med detheme()-inställningar som finns i exempelkoden.
Interaktiv övning med praktiskt arbete
Testa den här övningen genom att slutföra den här exempelkoden.
# For a starter, let's look at what you did before: adding various theme calls to your plot object
ilo_plot +
theme_minimal() +
theme(
text = element_text(family = "Bookman", color = "gray25"),
plot.subtitle = element_text(size = 12),
plot.caption = element_text(color = "gray30"),
plot.background = element_rect(fill = "gray95"),
plot.margin = unit(c(5, 10, 5, 10), units = "mm")
)
# Define your own theme function below
theme_ilo <- function() {
___() +
___(
___
)
}