在ggvis中添加带有layer_lines的虚线

Question

这很简单,但我无法找到解决方案.如何在以ggvis为单位的layers_lines中创建一行.我正在处理自定义类型的线性回归,我为我的问题提供了这个玩具示例:

library(ggvis)
W=seq(0,10,0.1)
data=data.frame(fit=3+2*W,upper=4+2*W,lower=2+2*W)
base <- data %>% ggvis(x= ~fit,y= ~W)%>%layer_lines() %>%
layer_lines(x= ~lower,y= ~W)%>%layer_lines(x= ~upper,y= ~W)

这会产生这个图像:

我希望上面和下面的线是虚线.非常感谢你的帮助!

Answer 1

它肯定有助于刷上Vega使用ggvis.您需要使用该strokeDash属性.

library(ggvis)

W <- seq(0, 10, 0.1)

data <- data.frame(fit=3+2*W, upper=4+2*W, lower=2+2*W)

data %>% 
  ggvis(x= ~fit, y= ~W) %>% 
  layer_lines() %>%
  layer_lines(x= ~lower, y= ~W, strokeDash:=6) %>% 
  layer_lines(x= ~upper, y= ~W, strokeDash:=6) -> base

base