如何在R的ggplot2中将图例显示在顶部?
为了在R的ggplot2中将图例显示在顶部,我们可以使用theme函数和legend.justification参数设置为顶部。
例如,如果我们有一个名为df的数据框,其中包含三列,例如X、Y和F,其中X和Y是数值型,F是类别型,那么我们可以使用下面给出的命令创建X和Y之间的散点图,并根据F中的值对点进行着色:
ggplot(df,aes(X,Y))+geom_point(aes(colour=factor(F)))+theme(legend.justification="top")
示例
以下代码片段创建了一个示例数据框:
x<-rnorm(20) y<-rnorm(20) Grp<-sample(LETTERS[1:3],20,replace=TRUE) df<-data.frame(x,y,Grp) df
创建了以下数据框:
x y Grp 1 -1.066129589 0.828709138 C 2 -1.222825364 -0.306424935 C 3 0.429354500 -1.446665340 B 4 -0.609955977 -0.288351976 A 5 1.200129675 0.716336213 C 6 0.800850596 -1.095220235 C 7 0.517368694 1.561305370 C 8 -0.006456066 -0.002988512 B 9 0.555280469 -1.241763197 C 10 -2.043538292 -1.734706075 C 11 -1.151771052 -0.878394321 B 12 0.845068460 -1.139618835 C 13 2.071684310 0.825474682 B 14 -0.250229200 -0.120597321 B 15 -1.280790787 -0.461785183 A 16 -0.028062183 -0.154095381 B 17 -0.620917924 0.398107075 A 18 0.302128850 0.497374731 C 19 0.719935519 -1.230463223 A 20 -0.862276767 0.518153886 A
要在上面创建的数据框上创建基于Grp值着色的x和y之间的散点图,请将以下代码添加到上面的代码片段中:
x<-rnorm(20) y<-rnorm(20) Grp<-sample(LETTERS[1:3],20,replace=TRUE) df<-data.frame(x,y,Grp) library(ggplot2) ggplot(df,aes(x,y))+geom_point(aes(colour=factor(Grp)))
输出
如果您将上面给出的所有代码片段作为一个程序执行,它将生成以下输出:
要在上面创建的数据框上创建基于Grp值着色的x和y之间的散点图,并在顶部显示图例,请将以下代码添加到上面的代码片段中:
x<-rnorm(20) y<-rnorm(20) Grp<-sample(LETTERS[1:3],20,replace=TRUE) df<-data.frame(x,y,Grp) library(ggplot2) ggplot(df,aes(x,y))+geom_point(aes(colour=factor(Grp)))+theme(legend.justification="top")
输出
如果您将上面给出的所有代码片段作为一个程序执行,它将生成以下输出:
广告