r - ggvis 的 xpd=TRUE 等价物

Question

我正在玩 ggvis 并想出了以下代码：

library(ggvis)
mtcars %>% ggvis(~disp, ~wt) %>%
  layer_points() %>%
  scale_numeric("x", domain = input_slider(50, 500, c(100, 400)), nice = FALSE) %>%
  scale_numeric("y", domain = input_slider(0, 6, c(1, 5)), nice = FALSE)

这使我能够动态调整绘图的大小。问题是，在调整某些数据点的大小时，绘制的范围超出了范围。是否有类似xpd=TRUE基本 R 图形的选项来裁剪绘图区域，以便不绘制不在轴范围内的数据点？