在r中使用grid.rect的渐变填充矩形

Question

我正在尝试使用grid.rect在R中的网格图上创建一个颜色条。我希望颜色条从左到右依次为100步，从红色到黄色到蓝色的渐变填充。

require(colorspace)
require("grid")
grid.rect(x = unit(0.5, "npc"), y = unit(0.8, "npc"),
      width = unit(0.5, "npc"), height = unit(0.05, "npc"), 
      just = "centre",
      gp = gpar(col = NA, fill =colorRampPalette(c("red", "yellow", "blue"), (100), "y"))

我得到的矩形只有一种颜色，红色，而不是渐变的颜色。