shiny - X 轴上的值在 Shiny 上的 ggvis 图中重叠

Question

我正在使用 Shinydashboard 环境来显示 ggvis 图。我想将它们中的 3 个放在一条线上，所以我使用了类似的东西（这些图与我实际使用的图并不完全相似，但它们产生了类似的效果）：

ui.R

fluidRow(
column(4,ggvisOutput("plot1")),
column(4,ggvisOutput("plot2")),
column(4,ggvisOutput("plot3")))  


server.R
vis<-reactive({
mtcars %>% ggvis(~1000*mpg,~wt,fill=~vs)%>%layer_points()%>%
set_options(width = 'auto', height = 400) })
vis %>%bind_shiny("plot1")

然而，由于图被相互压缩，每个图上 x 轴上的值相互重叠，这使得每张图都无法读取。

你知道是否有办法强制 ggvis 自动缩放 x 轴以使其可读？我是否还必须通过调整像素宽度来调整宽度。你知道另一种方式（也许在 Shiny 上）？