如何在ggvis中添加特定点到图例？

基本上我有我的ggvis正在绘制一个数据帧，但我想尝试颜色的情侣特定点，并添加一个表，以纪念那些什么点，指。到目前为止，我可以为这些点添加颜色，但我无法创建识别该点的图例。如何在ggvis中添加特定点到图例？

g1 <- subset(ex, p == 0.10) 

ex %>% ggvis(x = ~p, y = ~Pa_Achieved) %>% layer_lines() %>% 
    layer_points() %>% layer_points(data = g1, fill := "red") %>% 
    add_axis("x", title ="p") %>% 
    add_axis("y", title = "Pa", 
      properties=axis_props(labels=list(fontSize=12), 
           title=list(fontSize=12,dy=-25))) %>% 
    add_title(title = "Operating Characteristic Curve", 
      properties = axis_props(title=list(fontSize=20)))

基本上我想补充的颜色这种和其他三个点，一个简单的传奇确定什么这些点是其各自的颜色，并留下其他点黑。

来源

2017-06-18 Imconfused

请中，添加一个可再现的例子（https://stackoverflow.com/questions/5963269/how-to-make-a-great-r-reproducible-example） – Lstat

要从常量而不是变量创建图例，您将需要= ~而不是:=。您可以控制使用哪些颜色填充scale_nominal，并可以使用add_legend更改图例的外观。

下面是使用mtcars一个例子。

mtcars %>% 
    ggvis(x = ~mpg, y = ~wt) %>% 
    layer_points() %>% 
    layer_points(data = subset(mtcars, mpg == 33.9), fill = ~"mpg 33.9") %>% 
    layer_points(data = subset(mtcars, mpg == 32.4), fill = ~"mpg 32.4") %>% 
    scale_nominal("fill", range = c("red", "blue")) %>% 
    add_legend("fill", title = "groups")

来源

2017-06-20 18:29:33 aosmith

稀释，这是正是我正在寻找的！非常感谢！！ – Imconfused

如何在ggvis中添加特定点到图例？

回答

相关问题