R中的传单不显示可变的圆圈颜色

Question

在仔细阅读 Intro to Leaflet 之后，我尝试使用数据集，但是当我尝试使用公式界面时，kelp 的圆圈或标记没有颜色。我重新创建了一个玩具示例，如您所见，有些地方不对劲。虽然可能是我！所以：

library("leaflet")
set.seed(100)
pdf <- data.frame(Latitude = runif(100, -90,90), Longitude = runif(100, -180,180))

#just red
leaflet(pdf) %>% addTiles()  %>%
  addCircleMarkers(lat = ~ Latitude, lng = ~ Longitude, color= "red")

与显示红色圆圈标记的精美地图配合得很好。

但是。添加颜色似乎完全阻碍了标记。

#let's add some color!
pdf$Study <- factor(rep(1:10,10))
cols <- rainbow(length(levels(pdf$Study)))
pdf$colors <- cols[unclass(pdf$Study)]

leaflet(pdf) %>% addTiles()  %>%
  addCircleMarkers(lat = ~ Latitude, lng = ~ Longitude, color= ~ colors)

翻阅pdf的colors栏，应该都是鲜艳漂亮的，可惜啊。这是怎么回事？

Answer 1

默认情况下，rainbow returns 颜色 #RRGGBBAA 格式，Leaflet 无法使用。如果您添加参数 alpha=NULL 那么它应该可以正常工作。

R中的传单不显示可变的圆圈颜色

Leaflet in R not showing variable circle colors

r

leaflet