Question

我想要做的是从googleVis包中添加一条垂直线到R中的折线图。有谁知道这是否支持？例如，给定以下简单的折线图，我想在x = 2处添加一条垂直线。这甚至可能吗？

# Simple example. Must bring in 'googleVis' package first.  

df <- data.frame(country=c(1,2,3), val1=c(1,3,4), val2=c(23,12,32))
Line1 <- gvisLineChart(df, xvar="country", yvar=c("val1", "val2"))
plot(Line1)

Answer 1

我通过询问开发人员意识到了如何做到这一点。你使用NA来获得这样的垂直参考线：

library(googleVis)
dat <- data.frame(x=c(2,2,1,3,4),
              y1=c(0,3,NA,NA,NA),
              y2=c(NA,NA,0,3,2))
plot(gvisScatterChart(dat,
                  options=list(lineWidth=2,
                               pointSize=2))
)

在googleVis中添加一条垂直线到折线图

1 个答案: