我正在使用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)?