{"id":4200,"date":"2023-07-12T21:55:51","date_gmt":"2023-07-12T21:55:51","guid":{"rendered":"https:\/\/statorials.org\/de\/ggplot-durchschnittslinie-pro-gruppe\/"},"modified":"2023-07-12T21:55:51","modified_gmt":"2023-07-12T21:55:51","slug":"ggplot-durchschnittslinie-pro-gruppe","status":"publish","type":"post","link":"https:\/\/statorials.org\/de\/ggplot-durchschnittslinie-pro-gruppe\/","title":{"rendered":"So zeichnen sie den durchschnitt zeilenweise nach gruppe in ggplot2 auf"},"content":{"rendered":"

<\/p>\n

\n

Sie k\u00f6nnen die folgende grundlegende Syntax verwenden, um in ggplot2 eine Durchschnittslinie pro Gruppe zu zeichnen:<\/span><\/p>\n

 #calculate mean points value by team\n<\/span>mean_team <- df %>% group_by(team) %>% summarise(mean_pts=mean(points))\n \n#create scatterplot of assists vs points with mean line of points by team\n<\/span>ggplot(df, aes(x=assists, y=points)) +\n  geom_point(aes(color=team)) +\n  geom_hline(data=mean_team, aes(yintercept=mean_pts, col=team))\n<\/strong><\/pre>\n
 Dieses spezielle Beispiel erstellt ein Streudiagramm der Assists vs. Variable Assists<\/strong> . Punkte<\/strong> und f\u00fcgt dann eine Linie hinzu, um den Durchschnittswert der nach der Teamvariablen<\/strong> gruppierten Punkte<\/strong> darzustellen.<\/span><\/p>\n
 Das folgende Beispiel zeigt, wie diese Syntax in der Praxis verwendet wird.<\/span><\/p>\n
 Beispiel: Zeichnen der Durchschnittslinie pro Gruppe in ggplot2<\/strong><\/span><\/h2>\n
 Angenommen, wir haben den folgenden Datenrahmen in R, der Informationen \u00fcber die Punkte und Assists von Basketballspielern aus drei verschiedenen Teams enth\u00e4lt:<\/span><\/p>\n
 #create data frame\n<\/span>df <- data. frame<\/span> (team=rep(c(' A<\/span> ', ' B<\/span> ', ' C<\/span> '), each= 5<\/span> ),\n                 assists=c(2, 4, 4, 5, 6, 6, 7, 7,\n                           8, 9, 7, 8, 13, 14, 12),\n                 dots=c(8, 8, 9, 9, 10, 9, 12, 13,\n                          14, 15, 14, 14, 16, 19, 22))\n\n#view data frame\n<\/span>df\n\n   team assists points\n1 to 2 8\n2 to 4 8\n3 to 4 9\n4 to 5 9\n5 to 6 10\n6 B 6 9\n7 B 7 12\n8 B 7 13\n9 B 8 14\n10 B 9 15\n11 C 7 14\n12 C 8 14\n13 C 13 16\n14 C 14 19\n15 C 12 22\n<\/strong><\/span><\/pre>\n
 Mit dem folgenden Code k\u00f6nnen wir ein Streudiagramm der Assists<\/strong> vs. erstellen. Variablen. Punkte<\/strong> und f\u00fcgen Sie dann eine Linie hinzu, um den Durchschnittswert der nach der Teamvariablen<\/strong> gruppierten Punkte<\/strong> darzustellen.<\/span> <\/p>\n
 library<\/span> (dplyr)\nlibrary<\/span> (ggplot2)\n\n#calculate mean points value by team\nmean_team <- df %>% group_by(team) %>% summarise(mean_pts=mean(points))\n \n#create scatterplot of assists vs points with mean line of points by team\n<\/span>ggplot(df, aes(x=assists, y=points)) +\n  geom_point(aes(color=team)) +\n  geom_hline(data=mean_team, aes(yintercept=mean_pts, col=team))<\/span><\/span><\/strong><\/span> <\/pre>\n
\"ggplot-Durchschnittslinie<\/p>\n
 Die drei Linien sind farblich gekennzeichnet, um den durchschnittlichen Punktwert jedes Teams anzuzeigen.<\/span><\/p>\n
 Wir k\u00f6nnen den von uns erstellten Mean_Team-<\/strong> Datenrahmen anzeigen, um die tats\u00e4chlichen durchschnittlichen Punktwerte f\u00fcr jedes Team anzuzeigen:<\/span><\/p>\n
 #view mean points value by team\nmean_team<\/span>\n\n<\/span>`summarise()` ungrouping output (override with `.groups` argument)\n# A tibble: 3 x 2\n  team mean_pts\n      \n1 to 8.8\n2 B 12.6\n3 C 17<\/strong><\/span><\/pre>\n
 Aus dem Ergebnis k\u00f6nnen wir sehen:<\/span><\/p>\n