相关疑难解决方法(0)

我看到很多关于如何自定义图例的问题,但我甚至无法获得自定义的图例.我想有一个传说解释黑线是二次的,绿线是立方的.

library(ggplot2)

myfun1 <- function(x) x^2
myfun2 <- function(x) x^3

myplot <- ggplot(data = data.frame(x = 1:5, y= 1:5), aes(x=x, y=y)) +
    stat_function(fun = myfun1, color="green") +
    stat_function(fun = myfun2, color="black")

我想guide_colorbar用字符描述（例如“低”和“高”）而不是实际数字来修改连续美学。当对多个图（热图，例如 ）使用一个图例或颜色条时，这尤其有用geom_bin2d。

这里有一个例子。

说出给定的虚拟数据：

dd <- data.frame(xx=rnorm(100),yy=rnorm(100),zz=rep(1:10,10))

我可以像往常一样

ggplot(dd,aes(xx,yy,color=zz))+
  geom_point()+
  viridis::scale_color_viridis(option='A',direction=-1)

并使用隐藏颜色条注释

guides(color=guide_colorbar(ticks=F,label=F,title=element_blank()))

我尝试的另一种方法是修改色彩美学

factor(zz,labels=c('low',2:9,'high'))
...
guides(color=guide_legend(override.aes=list(size=5,shape=15)))

并绘制为离散的。也不是真正想要的。

如何添加自定义文本guide_colorbar？或者：有没有办法将离散图例转换为颜色条并保留字符标签？