我想改变取决于变量的条的不透明度
library(dplyr)
library(ggvis)
df <- data.frame(x=c(1,2),y=c(6,3),op=c(0.2,0.8))
df %>%
ggvis(x=~x,y=~y) %>%
layer_bars(opacity:=~op)
产生错误
Error in eval(expr, envir, enclos) : object 'op' not found
这似乎可行...
df %>%
ggvis(x=~x,y=~y, fillOpacity :=~ df$op) %>%
layer_bars()
它产生此:
这基本上等效于执行此操作:
df %>%
ggvis(x=~x,y=~y, fillOpacity :=~ c(0.2,0.8)) %>%
layer_bars()
并且之所以有效,是因为每个y变量都有一个值。我不确定以下原因为何不起作用,在我看来应该如此。也许有人可以启发...
df %>%
ggvis(x=~x,y=~y, fillOpacity :=~ op) %>%
layer_bars()
或者,使用您的代码(如果这样做)...
df %>%
ggvis(x=~x,y=~y) %>%
layer_bars(opacity:=~df$op)
然后您删除删除栏的边框,因为所有内容都用不透明颜色上色...
本文收集自互联网,转载请注明来源。
如有侵权,请联系[email protected] 删除。
我来说两句