如何更改facet_wrap中的构面标签

我正在使用ggplot和facet_wrap来获取所需的图.我必须在每个方面的标签或每个方面的变量或名称上添加一些东西,就像我们如何直接在ggplot下修改xlab和ylab一样.

例:

d <- ggplot(diamonds, aes(carat, price, fill = ..density..)) +
  xlim(0, 2) + stat_binhex(na.rm = TRUE) + theme(aspect.ratio = 1)

d + facet_wrap(~ color)

我现在要做的就是将每个方面的标签i,e D,E,F,G,H,I,J更改为其他内容.

我怎么修改这个?

加成

对不起,我试图打破它但是,这需要时间,所以我在github中添加它.
您可以上传文件并检查结果.
问题在于选项4 facet_wrap …您可以选择单选按钮选项4.

我已经评论过我之前使用过的facet_wrap数据完整性很好,但是如果我改变了facet包装,那么图表的行为也会不同,而且数据也是如此.

要上传的数据可以在“要上传的数据”文件夹中找到

代码可以在这里找到:我将在一分钟内添加它

根据我所知,在这种情况下,facet_grid可能是更好的解决方案. facet_grid不仅可以帮助您将一个变量分组,还可以两个甚至更多,有一个名为labeller的参数,用于自定义标签.

myfunction <- function(var, string) {
  print(var)
  print(string)
  result <- paste(as.character(string),'_new', sep="")
  return(result)
}

ggplot(diamonds, aes(carat, price, fill = ..density..)) + xlim(0, 2) + 
  stat_binhex(na.rm = TRUE) + theme(aspect.ratio = 1) + facet_grid(~color, labeller=myfunction, as.table=TRUE)

# OUTPUT
[1] "color"
[1] D E F G H I J
Levels: D < E < F < G < H < I < J

但是,正如您所看到的,绘图是一行的,即使您打开基于here的as.table标志,我也认为它不容易分成多行.

如果添加专用于标记的新专栏,您认为这是否可行?然后你可以保持facet_wrap的真棒……

diamonds$label <- paste(as.character(diamonds$color), "_new", sep="")
ggplot(diamonds, aes(carat, price, fill = ..density..)) + xlim(0, 2) + 
  stat_binhex(na.rm = TRUE) + theme(aspect.ratio = 1) + facet_wrap(~label)
相关文章
相关标签/搜索