r - R ggplot scale_fill_manual 使用颜色作为范围内的值
问题描述
我只是希望清理我的代码并学习一两件事。我觉得我让这变得比它应该的更困难。我有一个从 0-9 的数据范围,我想为该范围内的值指定一种颜色。例如:
0-3 green
4-6 yellow
7-9 red
这是我能够使它工作的唯一方法。我觉得应该有一种方法来指定休息时间的范围。即 0-3 = 绿色等。
ggplot() +
geom_raster(data = data, aes(x = samples, y = organism, fill = as.factor(value))) +
scale_fill_manual(values=c("green", "green", "green","green", "yellow","yellow","yellow", "red","red", "red"), breaks=c(0,1,2,3,4,5,6,7,8,9))
以下代码工作正常,但每当我尝试在休息时间创建一个范围时,我都会收到错误:
breaks=c(0-3,4-6,7-9)
Error: Insufficient values in manual scale. 10 needed but only 3 provided.
我希望这是相当不言自明的。如果需要,我可以提供一个示例数据集(如下)。感谢您的时间!
samples,organism,value
a,z,0
b,z,1
c,z,2
d,z,3
e,z,4
f,z,5
g,z,6
h,z,7
i,z,8
j,z,9
解决方案
我没有你的数据,但我做了一些我认为看起来像你的数据:
set.seed(123)
data <- expand.grid(samples = 1:5, organism = LETTERS[1:4])
data$value <- sample(0:9, 20, replace = TRUE)
使用这些数据,我在运行您的代码时遇到不同的错误:
ggplot() +
geom_raster(data = data, aes(x = samples, y = organism, fill = value)) +
scale_fill_manual(values=c("green", "green", "green", "green", "yellow", "yellow", "yellow", "red", "red", "red"),
breaks=c(0,1,2,3,4,5,6,7,8,9))
Error: Continuous value supplied to discrete scale
如果我转换value
为一个因子,我不会出错。我需要您的数据来帮助诊断错误。
ggplot() +
geom_raster(data = data, aes(x = samples, y = organism, fill = factor(value))) +
scale_fill_manual(values=c("green", "green", "green", "green", "yellow", "yellow", "yellow", "red", "red", "red"),
breaks=c(0,1,2,3,4,5,6,7,8,9))
使用我的数据,这是一种更简单的方法(特别是如果value
是连续的):
ggplot() +
geom_raster(data = data, aes(x = samples, y = organism,
fill = cut(value, breaks = c(0, 3, 6, 9)))) +
scale_fill_manual(name = "value",
values = c("green", "yellow", "red"),
labels = c("0-3", "4-6", "7-9"))
推荐阅读
- apache - sites/default/files/* 下的 Drupal html 文件正在下载但正在执行
- node.js - Elasticsearch 6.2 - 长文本的完成建议
- ruby-on-rails - 在rails中设置属性的默认值
- powerbi - Power Bi,数据结构雷达图
- cuda - cuda Cooperation_groups::thread_group 同步限制
- postgresql - Postgresql 条件和
- aframe - 如何在凝视和激光之间切换?
- curl - wttr.in 对浏览器的响应与 curl 有何不同?
- c# - C# - 释放的对象取决于鼠标的位置?
- python - MNIST 数据集上 keras 上的 i-RevNet