使用 R 中的 ggplot2 更改图例元素边框的颜色。
r programmingserver side programmingprogramming
要使用 ggplot2 更改图例元素边框的颜色，我们可以使用主题函数，其中可以使用 element_rect 将 legend.key 参数中的颜色设置为所需的颜色。
例如，如果我们有一个名为 df 的数据框，其中包含三列，即 X、Y 和 F，其中 X 和 Y 是数字，F 是分类，那么我们可以使用下面给出的命令在 X 和 Y 之间创建散点图，图例元素边框为蓝色 −
ggplot(df,aes(IV,DV))+geom_point(aes(colour=factor(Class)))+theme(legend.key=element_rect(colour="red"))
示例
以下代码片段创建了一个示例数据框 −
IV<-rpois(20,5)
DV<-rpois(20,5)
Class<-sample(c("I","II","III"),20,replace=TRUE)
df<-data.frame(IV,DV,Class)
df
创建以下数据框
IV DV Class 1 4 4 III 2 4 5 III 3 3 4 I 4 3 8 I 5 3 3 II 6 7 7 I 7 5 4 II 8 3 4 III 9 1 5 II 10 6 8 II 11 3 3 II 12 4 5 II 13 5 8 I 14 2 2 I 15 6 6 III 16 6 4 II 17 1 3 I 18 4 5 I 19 6 7 II 20 7 3 III
要加载 ggplot2 包并根据上面创建的数据框中的 Class 中的值在 IV 和 DV 之间创建散点图，请将以下代码添加到上面的代码片段中 −
IV<-rpois(20,5)
DV<-rpois(20,5)
Class<-sample(c("I","II","III"),20,replace=TRUE)
df<-data.frame(IV,DV,Class)
library(ggplot2)
ggplot(df,aes(IV,DV))+geom_point(aes(colour=factor(Class)))
输出
如果将上述所有代码片段作为单个程序执行，则会生成以下输出 −
若要创建 IV 和 DV 之间的散点图，其点的颜色基于类中的值，并且在上述数据框中具有红色的图例边框，请将以下代码添加到上述代码片段中 −
IV<-rpois(20,5)
DV<-rpois(20,5)
Class<-sample(c("I","II","III"),20,replace=TRUE)
df<-data.frame(IV,DV,Class)
library(ggplot2)
ggplot(df,aes(IV,DV))+geom_point(aes(colour=factor(Class)))+theme(legend.key=element_rect(colour="red"))
输出
如果将上述所有代码片段作为单个程序执行，则会生成以下输出 −
