Hoe hjust te gebruiken en gewoon elementen te verplaatsen in ggplot2

U kunt de argumenten hjust en vjust gebruiken om elementen respectievelijk horizontaal en verticaal te verplaatsen in ggplot2.

De volgende voorbeelden laten zien hoe u hjust en vjust in verschillende scenario’s kunt gebruiken.

Voorbeeld 1: Verplaats de titelpositie in ggplot2

De volgende code laat zien hoe u een spreidingsdiagram maakt in ggplot2 met een titel in de standaardpositie (links uitgelijnd):

 library (ggplot2)

#create scatter plot with title in default position
ggplot(data=mtcars, aes(x=mpg, y=wt)) +
  geom_point() +
  ggtitle(" Plot Title ") 

En de volgende code laat zien hoe je de titel kunt centreren met hjust=0.5 :

 library (ggplot2)

#create scatter plot with title center-aligned
ggplot(data=mtcars, aes(x=mpg, y=wt)) +
  geom_point() +
  ggtitle(" Plot Title ") +
  theme(plot. title = element_text(hjust= .5 )) 

Opmerking : u kunt ook hjust=1 gebruiken om de titel rechts uit te lijnen.

Voorbeeld 2: Verplaats de aslabelpositie in ggplot2

De volgende code laat zien hoe u een staafdiagram maakt in ggplot2 waarin de x-aslabels 90 graden worden gedraaid om ze gemakkelijker leesbaar te maken:

 library (ggplot2)

#create data frame
df = data. frame (team=c('The Amazing Amazon Anteaters',
                       'The Rowdy Racing Raccoons',
                       'The Crazy Camping Cobras'),
                dots=c(14, 22, 11))

#create bar plot to visualize points scored by each team
ggplot(data=df, aes(x=team, y=points)) +
  geom_bar(stat=' identity ') +
  theme(axis. text . x = element_text(angle= 90 )) 

We kunnen de argumenten hjust en vjust gebruiken om de labels van de x-as aan te passen, zodat ze beter aansluiten bij de maatstreepjes van de x-as:

 library (ggplot2)

#create data frame
df = data. frame (team=c('The Amazing Amazon Anteaters',
                       'The Rowdy Racing Raccoons',
                       'The Crazy Camping Cobras'),
                dots=c(14, 22, 11))

#create bar plot to visualize points scored by each team
ggplot(data=df, aes(x=team, y=points)) +
  geom_bar(stat=' identity ') +
  theme(axis. text . x = element_text(angle= 90 , vjust= .5 , hjust= 1 ) 

Voorbeeld 3: Verplaats tekstpositie in ggplot2

De volgende code laat zien hoe u een spreidingsdiagram maakt in ggplot2 met geannoteerde tekst voor elk punt in de grafiek:

 library (ggplot2)

#create data frame
df <- data. frame (player=c('Brad', 'Ty', 'Spencer', 'Luke', 'Max'),
                 dots=c(17, 5, 12, 20, 22),
                 assists=c(4, 3, 7, 7, 5))

#create scatter plot with annotated labels
ggplot(df) +
  geom_point(aes(x=points, y=assists)) + 
  geom_text(aes(x=points, y=assists, label=player)) 

We kunnen het argument vjust gebruiken om tekstelementen verticaal te verplaatsen, zodat ze gemakkelijker te lezen zijn:

 library (ggplot2)

#create data frame
df <- data. frame (player=c('Brad', 'Ty', 'Spencer', 'Luke', 'Max'),
                 dots=c(17, 5, 12, 20, 22),
                 assists=c(4, 3, 7, 7, 5))

#create scatter plot with annotated labels
ggplot(df) +
  geom_point(aes(x=points, y=assists)) + 
  geom_text(aes(x=points, y=assists, label=player), vjust= -.6 ) 

We kunnen ook een positieve waarde voor vjust gebruiken om tekstelementen verticaal naar beneden te verplaatsen:

 library (ggplot2)

#create data frame
df <- data. frame (player=c('Brad', 'Ty', 'Spencer', 'Luke', 'Max'),
                 dots=c(17, 5, 12, 20, 22),
                 assists=c(4, 3, 7, 7, 5))

#create scatter plot with annotated labels
ggplot(df) +
  geom_point(aes(x=points, y=assists)) + 
  geom_text(aes(x=points, y=assists, label=player), vjust= 1.2 ) 

De geannoteerde tekst bevindt zich nu onder elk punt op de plot.

Aanvullende bronnen

In de volgende tutorials wordt uitgelegd hoe u andere veelvoorkomende taken in ggplot2 kunt uitvoeren:

Hoe de titel van de legenda in ggplot2 te veranderen
Hoe aslabels te roteren in ggplot2
Hoe op te lossen in R: Kan functie “ggplot” niet vinden