r - ggplot, geom_tile : plot continuous variable using irregular, 用户定义的离散间隔

Question

我正在使用 ggplot 和 geom_tile 绘制连续变量。默认情况下，它使用连续颜色条进行绘图。像这样的事情，

data <- cbind(ID = 1:100, a = runif(100, 0, 1), b = runif(100, 0, 1), c = runif(100, 0, 1))
data <- as.data.frame(data)
data <- melt(data, id.vars = "ID")
colnames(data) <- c("ID", "Parameter", "Value")

p <- ggplot(data, aes(y = ID, x = Parameter)) + geom_tile(aes(fill = Value))
print(p)

这会产生以下图。

现在，我真正想要的是颜色与离散的、不规则的间隔相对应。例如，[0, 0.2) 为红色，[0.2, 0.5) 为蓝色，[0.5, 1.0] 为紫色。我希望这很简单，但我似乎不知道如何实现这一点。有什么建议吗？

Answer 1

感谢@aosmith提供的解决方案。这是代码，以防对某人有用。

p <- ggplot(data, aes(y = ID, x = Parameter)) 
p <- p + geom_tile(aes(fill = cut(Value, breaks = c(0, .2, .5, 1), include.lowest = TRUE)))
p <- p + scale_fill_manual(values = c("red", "blue", "green"),
                           labels = c("[0, 0.2)", "[0.2, 0.5)", "[0.5, 1.0]"),
                           name = "Stuff")
print(p)

这会产生以下图。