我正在使用ggvis在两个维度上绘制聚类点。我已经将这些点聚集在更多的维度中。所以除了x，y坐标之外，每个点都有一个簇号（范围0：-20）。我想生成一个散点图，其中每个点根据其坐标定位，其颜色应该按照其簇。我能够使用数据生成散点图。但是对于填充，我没有获得大于10的簇数的不同颜色。下面是我的代码：
nm_clust%>% ggvis(~x, ~y, key := ~id,fill = ~factor(cluster)) %>%
layer_points()%>% set_options(width = 1000, height = 1000,resizable=T)%>%
add_legend("fill", title = "Clusters")%>%
add_tooltip(add_values,"hover")
数据集的聚类列的因子如下：
levels(factor(nm_clust$cluster))
[1] "0" "1" "2" "3" "4" "5" "6" "7" "8" "9" "10" "11" "12" "13" "14"
[16] "15" "16" "17" "18" "19" "20"
有人可以告诉我哪里出错吗？