So fügen sie tabellen zu plots in ggplot2 hinzu (2 beispiele)

Häufig möchten Sie möglicherweise Tabellen zu Diagrammen hinzufügen, die in ggplot2 in R erstellt wurden, damit Leser die Rohdaten zusammen mit dem Diagramm visualisieren können.

Glücklicherweise ist es mit dem Paket ggpmisc einfach, Tabellen zu Diagrammen hinzuzufügen:

 install. packages (' ggpmisc ')
library (ggpmisc)

Die folgenden Beispiele zeigen, wie Sie dieses Paket verwenden, um mithilfe des folgenden Datenrahmens eine Tabelle zu einem Balken- und Streudiagramm hinzuzufügen:

 #create data frame
df <- data. frame (team=c('A', 'A', 'A', 'A', 'B', 'B', 'B', 'B'),
                 position=c('G', 'G', 'F', 'F', 'G', 'G', 'F', 'F'),
                 points=c(13, 23, 24, 20, 19, 14, 29, 31))

#view data frame
df

  team position points
1 AG 13
2 AG 23
3 AF 24
4 AF 20
5 BG 19
6 BG 14
7 BF 29
8 BF 31

Beispiel 1: Fügen Sie eine Tabelle zu Barplot in ggplot2 hinzu

Wir können den folgenden Code verwenden, um ein gruppiertes Barplot in ggplot2 zu erstellen und in der unteren rechten Ecke des Diagramms eine Tabelle hinzuzufügen, um die tatsächlichen Werte des Datenrahmens anzuzeigen:

 library (ggplo2)
library (ggpmisc)

#create barplot with table
ggplot(df, aes(x=team, y=points, fill=position)) + 
    geom_bar(position=' dodge ', stat=' identity ') +
    annotate(geom = ' table ',
           x=4,
           y=0,
           label=list(df))

Wenn Sie mit einem großen Datensatz arbeiten und nicht jede einzelne Zeile anzeigen möchten, können Sie die Funktion table() verwenden, um die Daten zusammenzufassen, bevor Sie die Tabelle in ggplot2 erstellen:

 library (ggplot2)
library (ggpmisc)

#summarize frequencies of team and points in table
my_table <- as. data . frame (table(df[, c(1, 3)]))

#create barplot with table
ggplot(df, aes(x=team, y=points, fill=position)) + 
    geom_bar(position=' dodge ', stat=' identity ') +
    annotate(geom = ' table ',
           x=4,
           y=0,
           label=list(my_table))

Beispiel 2: Fügen Sie eine Tabelle zum Streudiagramm in ggplot2 hinzu

Mit dem folgenden Code können wir ein Streudiagramm in ggplot2 erstellen und in der unteren rechten Ecke des Diagramms eine Tabelle hinzufügen, um die tatsächlichen Werte aus dem Datenrahmen anzuzeigen:

 library (ggplo2)
library (ggpmisc)

#create scatterplot with table
ggplot(df, aes(x=team, y=points)) + 
    geom_point(aes(color=position)) +
    annotate(geom=' table ',
           x=4,
           y=0,
           label=list(df))

Hinweis : Spielen Sie gerne mit den x- und y- Werten in der Funktion annotate() , um das Array genau an der gewünschten Stelle zu platzieren.

Zusätzliche Ressourcen

Die folgenden Tutorials erklären, wie Sie andere häufige Aufgaben in ggplot2 ausführen:

So fügen Sie Text zu ggplot2-Plots hinzu
So ändern Sie die Titelposition in ggplot2
So ändern Sie die Reihenfolge der Elemente in der ggplot2-Legende