HOWTO · R
Konfidenzintervall zu Ggplot2 in R hinzufügen
Dieses Tutorial zeigt, wie Sie ggplot2 in R ein Konfidenzintervall hinzufügen.
Die Bibliothek ggplot2 wird verwendet, um verschiedene Graphen zu zeichnen. Wir können die Methode geom_smooth() oder geom_ribbon() verwenden, um dem Diagramm Konfidenzintervalllinien oder -bänder hinzuzufügen.
Dieses Tutorial demonstriert das Hinzufügen eines Konfidenzintervalls zu ggplot2 in R.
Konfidenzintervall zu ggplot2 in R hinzufügen
Zuerst müssen wir den Datenrahmen erstellen, auf dem wir das ggplot2 zeichnen werden.
Beispielcode:
x <- 1:80
y <- rnorm(80) + x / 8
low <- y + rnorm(80, - 2, 0.1)
high <- y + rnorm(80, + 2, 0.1)
data_frame <- data.frame(x, y, low, high)
head(data_frame)
Der obige Code erstellt einen Beispieldatenrahmen mit 80 Zeilen und vier Spalten; x und y sind die Werte, die geplottet werden, und die Werte hoch und niedrig sind die Konfidenzintervalle für diese Werte.
Siehe Ausgabe für den Code, der der Kopf des Datenrahmens ist:
x y low high
1 1 0.7819640 -1.29439898 2.719669
2 2 0.8893052 -1.09524369 2.885744
3 3 1.8762126 0.03061524 3.910596
4 4 -0.3713966 -2.34534103 1.683949
5 5 1.9099850 -0.04985367 4.026922
6 6 1.2793110 -0.82542732 3.199673
Der nächste Schritt ist das Plotten des ggplot2. Aber zuerst müssen wir das Paket ggplot2 installieren und laden:
install.packages("ggplot2")
library("ggplot2")
Sobald das Paket geladen ist, können wir jetzt den ggplot plotten:
gg_plot <- ggplot(data_frame, aes(x, y)) +
geom_point()
gg_plot
Der obige Code zeichnet das Diagramm:
Mit den Methoden geom_smooth() oder geom_ribbon() können wir endlich das Konfidenzintervall zu ggplot2 hinzufügen.
Konfidenzintervalllinien mit der Methode geom_smooth() hinzufügen:
## Add confidence interval lines
gg_plot + geom_smooth(aes(ymin = low, ymax = high), alpha = 0.2)
Fügen Sie Konfidenzintervallbänder mit der Methode geom_ribbon() hinzu:
Vollständiger Beispielcode
Hier ist der vollständige Beispielcode, der in diesem Tutorial verwendet wird.
x <- 1:80
y <- rnorm(80) + x / 8
low <- y + rnorm(80, - 2, 0.1)
high <- y + rnorm(80, + 2, 0.1)
data_frame <- data.frame(x, y, low, high)
head(data_frame)
install.packages("ggplot2")
library("ggplot2")
gg_plot <- ggplot(data_frame, aes(x, y)) +
geom_point()
gg_plot
## Add confidence interval lines
gg_plot + geom_smooth(aes(ymin = low, ymax = high), alpha = 0.2)
## Add confidence interval bands
gg_plot + geom_ribbon(aes(ymin = low, ymax = high), alpha = 0.2)
