colorbar with plotly in r

Question

我在绘制颜色条的颜色时遇到了一些麻烦 这是我的脚本的一部分：

else if(is.na(pmatch("NGVS",limits[,ii]))&(max_value==min_value)){
  if (max_value==0){
    m<-list(
      colorbar = list(title = ii),
      size = 20, symbol = 'square',cmin=0,cmax=limits[,ii])

    mypalette=rev(rainbow(100,
                          start=rgb2hsv(col2rgb('blue'))[1], end=rgb2hsv(col2rgb('yellow'))[1]))

    p = plot_ly(graph3,x=Sampling.Date,y=Yaxis.,type="scatter",
                color=param_to_plot,colors= mypalette,mode="markers",marker = m)
    p = layout(p,yaxis = a,  xaxis=b, autosize = F, width = 700, height = 700, margin = q)
    print(p)
    rm(p)

我想要的是将颜色条的颜色设置为绿色到黄色。由于这些点都是零，所以它们都应该是绿色的。现在，我只有一个从灰色到红色的红色色标，所有的点都是灰色的。而且我不知道如何修复它。谢谢你的帮助