我正在尝试使用ggvis包创建交互式可视化。
具体来说,用户应该能够选择应在哪些轴上绘制哪些变量。在this question的答案2中已经提出了一种方法。但是在此解决方案中,轴未正确标记:
E.g。在这个例子中
library("ggvis")
library("magrittr")
sel <- input_select(names(mtcars),map=as.name)
mtcars %>% ggvis(sel,~mpg) %>% layer_points()
y轴具有标记“reactive_x”(x是随机数)。 我现在想根据当前选择的变量标记y轴。添加
%>% add_axis("y",title=sel)
不起作用,因为sel是一个闭包,而不是一个字符向量。在as.character中包装sel也不起作用。
有没有人能解决这个问题?
注意:通过将ggvis图包装在闪亮的应用程序中,这可能更容易解决。但是,我对这样的解决方案不感兴趣,因为这个可视化将成为我正在开发的包的一部分。