如何在 R 中使用 ggplot2 图表显示波浪号 (~)?
假设我们想要在使用 ggplot2 图表绘制的直方图的特定位置显示波浪号 (~) 符号。在这种情况下,我们可以使用 geom_text 函数,并在 aes 中的 label 参数内传递所有文本,其中波浪号将写为 %~%。
例如,如果我们想要显示 X 服从正态分布,我们可以这样写:
geom_text(aes(label="X %~% Normal Distribution",x=0,y=200),parse=TRUE)
这里,x=0 和 y=200 是直方图中标签的位置。
示例
考虑以下数据框:
x<-rnorm(2000,5,2) df<-data.frame(x) head(df,20)
创建了以下数据框
x 1 3.429893 2 2.873259 3 4.621022 4 4.873246 5 4.707371 6 7.650049 7 6.402318 8 4.427331 9 6.830767 10 4.535618 11 6.622828 12 4.770918 13 1.018385 14 5.725048 15 2.238412 16 6.623515 17 4.835721 18 5.266638 19 5.380624 20 4.381922
要加载 ggplot2 包并在上面创建的数据框上创建 x 的直方图,请将以下代码添加到上面的代码段中:
x<-rnorm(2000,5,2) df<-data.frame(x) library(ggplot2) ggplot(df,aes(x))+geom_histogram(bins=30)
输出
如果将上面给出的所有代码段作为单个程序执行,它将生成以下输出:
要在上面创建的数据框上创建 x 的直方图,并在图中表示波浪号 (~) 符号,请将以下代码添加到上面的代码段中:
x<-rnorm(2000,5,2) df<-data.frame(x) library(ggplot2) ggplot(df,aes(x))+geom_histogram(bins=30)+geom_text(aes(label="X %~% N(mu==5,sigma==2)",x=0,y=200),parse=TRUE)
输出
如果将上面给出的所有代码段作为单个程序执行,它将生成以下输出:
广告