在ggplot

时间:2016-09-20 19:18:39

标签: r ggplot2

我正在尝试使用geom_tile创建一个图。源数据是连续的,但我想使用离散级别对其进行着色,以使得结果图更容易阅读。我希望生成的颜色条显示离散级别,但要将基础数据称为连续级别。像这样的东西: colourbar

基本上是一个用离散值覆盖的连续色标。

到目前为止,我有这个:

require( ggplot2)

x <- rep( 1:10, 10)
y <- rep( 1:10, each=10)
z <- rnorm( length(y))

df <- data.frame( x, y, z)

ggplot( df) + geom_tile( aes( x, y, fill=z)) +
scale_fill_gradient2( low="blue", mid="white", high="red", midpoint=0)

给出这个: continuous scale

我想将连续变量“z”加到设置级别,所以我可以使用cut:

df$discrete_z <- cut( z, breaks=seq( -3,3, 1), include.lowest=T)

ggplot( df) + geom_tile( aes( x, y, fill=discrete_z)) +   
scale_fill_brewer( type="div", palette="PRGn", guide="legend")

给出这个: discrete scale

这是更接近,但现在数字表示为每个颜色“块”的范围,而我试图让数字单独位于颜色块之间,以给出连续比例的更好印象。

1 个答案:

答案 0 :(得分:2)

如果您选择每个区间的下限作为区域名称,您将获得如下内容:

df$discrete_z <- cut( z, breaks=seq( -3,3, 1), labels = seq( -3,2, 1), include.lowest=T)

ggplot( df) + geom_tile( aes( x, y, fill=discrete_z)) +   
  scale_fill_brewer( type="div", palette="PRGn", guide="legend")

enter image description here