将自定义数字添加到ggplot图例

ifreak

我正在画一个geom_tile图,每个点都有一个特定的p-value

该图p-value以图例限制很好地绘制

我要添加到此图例的是具有此标记的数据点的数量p-value

例:

图例就是这样(每个值都有一个颜色):

0.05
0.04
0.03
0.02
0.01

我想要的是这样的:

0.05 58
0.04 34
0.03 85
0.02 54
0.01 10

如何将其添加到图例中ggplot2

我尝试使用geom_text并将文本位置更改为图例,但没有成功。

更新

pl <- ggplot(df.new) + geom_tile(aes(fill=z, x, y)) + 
      scale_fill_gradient(low="yellow", high="red", name="Legend1") + 
      stat_contour(breaks=c(0.001, 0.01, 0.05), aes(x=x, y=y, z=npvalue, colour=..level..)) +
      scale_colour_gradient2(low="black", mid="black", high="green", labels=paste(levels(c(0.001, 0.01, 0.05))))

我有这个图,我geom_tilez变量正确地绘制,然后我stat_contour根据p值绘制了a 我想编辑stat_contour基于p-value我最初问题中颜色的标签,但是我遇到了这个错误:

Error in scale_labels.continuous(scale, breaks) : 
  Breaks and labels are different lengths

我的绘图问题在哪里?

斯文·霍恩斯坦

您可以指定颜色labels的图例fill

示例数据集:

set.seed(1)
dat <- data.frame(x = rep(1:5), y = rep(1:10), 
                  z = factor(sample(seq(0.01, 0.05, 0.01), 100, TRUE)))

该函数table计算以下项的不同值dat$z

table(dat$z)

# 0.01 0.02 0.03 0.04 0.05 
#   13   25   19   26   17

剧情:

library(ggplot2)
ggplot(dat) +
  geom_tile(aes(x = x, y = y, fill = z)) + 
  scale_fill_discrete(labels = paste(levels(dat$z), table(dat$z)))

在最后一行中,labels创建了图例。

在此处输入图片说明

本文收集自互联网,转载请注明来源。

如有侵权,请联系[email protected] 删除。

编辑于
0

我来说两句

0条评论
登录后参与评论

相关文章

来自分类Dev

R:将自定义图例添加到ggplot

来自分类Dev

将自定义图例添加到bokeh Bar

来自分类Dev

将自定义图例添加到fourfold()

来自分类Dev

将自定义ggplot图例添加到虚线和置信带中

来自分类Dev

R ggplot2:将自定义文本添加到图例和热图侧面的值计数

来自分类Dev

将自定义CSS类添加到WFFM表单部分的图例元素

来自分类Dev

使用scale _..._ manual将自定义图例添加到具有两个geom_point图层的ggplot中

来自分类常见问题

将自定义图像添加到geom_polygon中,填写ggplot

来自分类Dev

将自定义标头添加到“请求”

来自分类Dev

Hibernate将自定义前缀添加到目录

来自分类Dev

将自定义函数添加到类

来自分类Dev

将自定义类添加到引导按钮

来自分类Dev

将自定义键绑定添加到XCode

来自分类Dev

无法将自定义字体添加到Xcode

来自分类Dev

将自定义属性添加到Serilog

来自分类Dev

pyqt:将自定义列添加到QFileSystemModel

来自分类Dev

将自定义视图添加到警报视图

来自分类Dev

将自定义别名添加到.zshrc

来自分类Dev

将自定义标签添加到TIFF文件

来自分类Dev

将自定义代码段添加到emmet

来自分类Dev

将自定义Gradle插件添加到项目

来自分类Dev

将自定义属性添加到SimpleSAMLPhp

来自分类Dev

将自定义字段添加到Django admin

来自分类Dev

将自定义消息添加到TestNG失败

来自分类Dev

将自定义字体添加到GUI SWT

来自分类Dev

将自定义路线添加到Apigility

来自分类Dev

将自定义月份按钮添加到FullCalendar

来自分类Dev

将自定义Js添加到Wordpress主题

来自分类Dev

将自定义MKAnnotationView添加到MKPointAnnotation