如何获得平滑的渐变色条？

Question

我正在研究R中的图像处理。我正在为我的图像使用特定的颜色方案。为了将颜色条与图像一起表示，我将颜色条分成几部分，如下图所示。有没有办法获得平滑的渐变色条？这是我正在使用的代码：

s <- seq(from=range[1], to=range[2], by=0.1)

 levelplot(t(m), scales=list(tick.number=0), xlab=" ", ylab=" ", colorkey = list(at=s, labels=as.character(s)),col.regions = two.colors(n=256, start='red', end='blue',middle='black'), main=main)

这是我想要获得的平滑渐变条：