r - 使用 R 限制 Dygraph 中的缩放粒度

Question

我正在使用每周数据在 Shiny App 中创建一个 dygraph 时间序列，我希望能够限制 x 轴上的缩放，以便用户不能小于每周级别。完全缩小时，轴仍应显示季度代码标签，因为每周变得过于拥挤。我想为zoomCallback参数创建一个函数，但不熟悉 dygraph 功能，所以我不确定什么是允许的。

  output$dygraph <- renderDygraph({
    dygraph(data) %>%
      dyOptions(labelsUTC = TRUE, fillGraph = FALSE, fillAlpha = 0.1, drawGrid = FALSE, strokeWidth = 3) %>%
      dyCallbacks(
        zoomCallback = "function(minDate, maxDate, yRanges){
        
            #TODO: set x range to weekly somehow.
        
        }
        
        "
      )
      dyCrosshair(direction = "vertical")
  })