ggvis：将大小属性添加到一行

Question

刚刚开始使用ggvis。恐怕不是一个特别有趣或普遍的问题，但对我来说如何将size 属性添加到一行并不明显。特别是，我将如何使用ggvis 复制以下情节？

library(ggplot2)

df <- data.frame(
  id = c(1,1,1,2,2,2,2),
  x  = c(1,2,3,1,2,3,4),
  y  = c(2,3,4,1,1,2,3)
)

ggplot(df, aes(x, y, colour = as.factor(id), size = id)) +
  geom_line()

另外，有足够高声誉的人可以创建ggvis 标签吗？干杯。

Answer 1

以下内容：

library(ggvis)

gg <- ggvis(df, props(~x, ~y, stroke = ~factor(id)))
gg <- gg + layer_line(props(strokeWidth := ~id*4))
gg

产生：

我不得不调整 strokeWidth 的乘数，让它变得更厚一些，但这对你来说应该是一个很好的起点。请记住 ggivs 是基于 Vega 的，因此熟悉新图形语法中的术语几乎是了解如何在 ggvis 中“思考”的要求。

这是一个更正确地执行此操作的示例（以及更多 ggplot2-like scale_quantitative：

gg <- ggvis(df, props(~x, ~y, stroke = ~factor(id)))
gg <- gg + layer_line(props(strokeWidth = ~id)) 
gg <- gg + scale_quantitative("strokeWidth",
                              trans="linear", 
                              domain=range(df$id), 
                              range=c(1,10))
gg

执行?scale_quantitative 或查看"scales" online examples 应该可以让您很好地了解获得所需效果的选项。

我还应该指出第二个示例中“=”与“:=”的使用。来自ggvis 网站：

props() 函数使用 = 操作进行映射（缩放），使用 := 操作进行设置（未缩放）。它还使用 ~ 运算符来指示应该在数据中计算表达式（在 ggvis 中，数据可以更改）；如果没有 ~ 运算符，表达式会立即在当前环境中求值。