Нашел это !!!
xVariables = c("hp","disp")
mtcars %>%
ggvis(prop("x", input_select(xVariables, map=as.name), scale = TRUE), y=~mpg) %>%
scale_numeric("x", domain = c(NA, NA), clamp = TRUE, nice = TRUE) %>%
scale_numeric("y", domain = c(NA, NA), clamp = TRUE, nice = TRUE) %>%
add_axis("x", title = "I don't know how this make this dynamic.") %>%
layer_points()
(К сожалению, я не мог понять, как динамически настроить xlabel. Если кто-нибудь знает, дополнение было бы очень кстати.)
Этот пост от Джонатана Х очень помог!