ggvis 滑块被压扁

ggvis slider is squashed

我正在使用 RStudio 版本 0.98.1103 中的 R 版本 3.2.0 (2015-04-16)。 该平台是平台 i386-w64-mingw32。我正在使用 Windows Vista 版本 6。此代码

require(ggvis)
require(dplyr)

# ggvis use of a slider

mtcars %>% 
    ggvis(~wt, ~mpg, size := input_slider(10, 100), 
                opacity := input_slider(0,1) ) %>% 
    layer_points()

有效,但滑块在图的左侧被压扁,因此难以使用。请问我该如何克服这个问题?

这似乎是 ggvis 的 CRAN 版本中的错误。

尝试:

# install.packages("devtools")
devtools::install_github("hadley/lazyeval", build_vignettes = FALSE)
devtools::install_github("hadley/dplyr", build_vignettes = FALSE)
devtools::install_github("rstudio/ggvis", build_vignettes = FALSE)

library(ggvis)

mtcars %>% 
  ggvis(~wt, ~mpg, size := input_slider(10, 100), 
        opacity := input_slider(0,1) ) %>% 
  layer_points()