如何在R的ggplot2中更改Facet标题的颜色?


要更改R中ggplot2中facet标题的颜色,我们可以使用带有`strip.text.x`参数的`theme`函数。

例如,如果我们有一个名为df的数据框,它包含三列,例如X、Y和F,其中F是一个因子列,那么我们可以使用下面提到的命令为F中不同值的X和Y之间创建分面散点图,并使分面标题具有不同的颜色:

ggplot(df,aes(X,Y))+geom_point()+facet_wrap(~F)+theme(strip.text.x=element_text(colour="red"))

示例

以下代码片段创建了一个示例数据框:

Price<-sample(1:10,20,replace=TRUE)
Demand<-sample(50:100,20)
Region<-sample(c("Plane","Hill"),20,replace=TRUE)
df<-data.frame(Price,Demand,Region)
df

创建了以下数据框:

  Price Demand Region
 1 3    62     Plane
 2 4    78     Plane
 3 5    75     Hill
 4 10   64     Hill
 5 2    54     Plane
 6 1    58     Plane
 7 3    81     Plane
 8 6    91     Plane
 9 4    50     Plane
10 5    76     Plane
11 1    63     Hill
12 9    72     Hill
13 9    93     Plane
14 3    88     Plane
15 10   84     Hill
16 1    89     Plane
17 2    82     Plane
18 6    55     Plane
19 7    98     Hill
20 4    67     Hill

要在上面创建的数据框上基于区域创建需求和价格之间的散点图,并使用分面,请将以下代码添加到上面的代码片段中:

Price<-sample(1:10,20,replace=TRUE)
Demand<-sample(50:100,20)
Region<-sample(c("Plane","Hill"),20,replace=TRUE)
df<-data.frame(Price,Demand,Region)
library(ggplot2)
ggplot(df,aes(Demand,Price))+geom_point()+facet_wrap(~Region)

输出

如果您将上面给出的所有代码片段作为一个程序执行,它将生成以下输出:

要在上面创建的数据框上基于区域创建需求和价格之间的散点图,并使用蓝色分面,请将以下代码添加到上面的代码片段中:

Price<-sample(1:10,20,replace=TRUE)
Demand<-sample(50:100,20)
Region<-sample(c("Plane","Hill"),20,replace=TRUE)
df<-data.frame(Price,Demand,Region)
library(ggplot2)
ggplot(df,aes(Demand,Price))+geom_point()+facet_wrap(~Region)+theme(strip.text.x=element_text(colour="blue"))

输出

如果您将上面给出的所有代码片段作为一个程序执行,它将生成以下输出:

更新于:2021年11月9日

576 次浏览

启动您的职业生涯

完成课程获得认证

开始
广告