So zeichnen sie den durchschnitt zeilenweise nach gruppe in ggplot2 auf

Sie können die folgende grundlegende Syntax verwenden, um in ggplot2 eine Durchschnittslinie pro Gruppe zu zeichnen:

 #calculate mean points value by team
mean_team <- df %>% group_by(team) %>% summarise(mean_pts=mean(points))
 
#create scatterplot of assists vs points with mean line of points by team
ggplot(df, aes(x=assists, y=points)) +
  geom_point(aes(color=team)) +
  geom_hline(data=mean_team, aes(yintercept=mean_pts, col=team))

Dieses spezielle Beispiel erstellt ein Streudiagramm der Assists vs. Variable Assists . Punkte und fügt dann eine Linie hinzu, um den Durchschnittswert der nach der Teamvariablen gruppierten Punkte darzustellen.

Das folgende Beispiel zeigt, wie diese Syntax in der Praxis verwendet wird.

Beispiel: Zeichnen der Durchschnittslinie pro Gruppe in ggplot2

Angenommen, wir haben den folgenden Datenrahmen in R, der Informationen über die Punkte und Assists von Basketballspielern aus drei verschiedenen Teams enthält:

 #create data frame
df <- data. frame (team=rep(c(' A ', ' B ', ' C '), each= 5 ),
                 assists=c(2, 4, 4, 5, 6, 6, 7, 7,
                           8, 9, 7, 8, 13, 14, 12),
                 dots=c(8, 8, 9, 9, 10, 9, 12, 13,
                          14, 15, 14, 14, 16, 19, 22))

#view data frame
df

   team assists points
1 to 2 8
2 to 4 8
3 to 4 9
4 to 5 9
5 to 6 10
6 B 6 9
7 B 7 12
8 B 7 13
9 B 8 14
10 B 9 15
11 C 7 14
12 C 8 14
13 C 13 16
14 C 14 19
15 C 12 22

Mit dem folgenden Code können wir ein Streudiagramm der Assists vs. erstellen. Variablen. Punkte und fügen Sie dann eine Linie hinzu, um den Durchschnittswert der nach der Teamvariablen gruppierten Punkte darzustellen.

 library (dplyr)
library (ggplot2)

#calculate mean points value by team
mean_team <- df %>% group_by(team) %>% summarise(mean_pts=mean(points))
 
#create scatterplot of assists vs points with mean line of points by team
ggplot(df, aes(x=assists, y=points)) +
  geom_point(aes(color=team)) +
  geom_hline(data=mean_team, aes(yintercept=mean_pts, col=team)) 

Die drei Linien sind farblich gekennzeichnet, um den durchschnittlichen Punktwert jedes Teams anzuzeigen.

Wir können den von uns erstellten Mean_Team- Datenrahmen anzeigen, um die tatsächlichen durchschnittlichen Punktwerte für jedes Team anzuzeigen:

 #view mean points value by team
mean_team

`summarise()` ungrouping output (override with `.groups` argument)
# A tibble: 3 x 2
  team mean_pts
      
1 to 8.8
2 B 12.6
3 C 17

Aus dem Ergebnis können wir sehen:

• Der durchschnittliche Punktwert der Spieler von Team A beträgt 8,8.
• Der durchschnittliche Punktwert der Spieler von Team B beträgt 12,6.
• Der durchschnittliche Punktwert der Spieler der Mannschaft C beträgt 17.

Diese Werte entsprechen den Positionen der Linien auf der y-Achse des von uns erstellten Streudiagramms.

Zusätzliche Ressourcen

In den folgenden Tutorials wird erläutert, wie Sie andere häufige Aufgaben in R ausführen:

So erstellen Sie ein relatives Häufigkeitshistogramm in R
So zeichnen Sie mehrere Boxplots in einem einzigen Diagramm in R
So zeichnen Sie mehrere Linien in einem Diagramm in R