2017-07-18 143 views
0

我有这样的调色板的,我想用自定义颜色刻度fitted.contour热图与基础R

palette <- colorRampPalette(c("darkblue", "blue", "lightblue1", 
           "green", "yellow", "red", "darkred")) 

插图我的图怎么看 enter image description here

我用的那一刻filled.contour()用一些修改来绘制该图。

下面的代码的一部分,通过使用data,从my workspacechannelsdfsave.image()制成使得有些类似于图

load("workspace.RData") 
library(lubridate) 

breaks <- "2 hours" 
palette <- colorRampPalette(c("darkblue", "blue", "lightblue1", 
           "green", "yellow", "red", "darkred")) 
f <- function(x) as.POSIXct(levels(cut(x, breaks))) 

filled.contour(x = data$Time, 
       y = log10(channels), 
       z = df, 
       color.palette = palette, 
       plot.axes = axis(1, at = f(data$Time), 
           labels = format(f(data$Time), "%H:%M"))) 

现在该功能正在使右边的颜色图例看起来像默认情况下那样。我想指定自己,深蓝对应于0,深红对应于某个用户定义的值,例如20百万。

我想要这个,因为如果我将这些数据的图形与其他数据的图形进行比较,它们将具有完全相同的颜色图例。

告诉我,如果我需要提供更多的信息或任何东西。

编辑:

从我的工作区提供的数据作为workspace.RData文件。

+0

有关更多信息,请参见[此链接](https://stackoverflow.com/questions/5963269/how-to-make-a-great-r-reproducible-example)。有人很难用这个小代码重现你的例子。 – Florian

+0

仍然卡在这里。有没有一种方法可以根据我的喜好修改'filled.contour()'函数? – Tsingis

+0

提取你的文件为我返回一个错误。为了让人们更容易回答您的问题,请提供前面提供的链接中指定的示例数据,例如使用dput()。 – Florian

回答

0

levels(和nlevels)参数似乎做的工作很好......我觉得很蠢。