flexdashboard

Question

我在flexdashboard中使用GoogleVis创建了日历热图。但是情节的宽度只是页面的一半。我想将情节拉伸到全宽。

这是我的数据：

    head(test)
           num_of_clients
1996-07-18             12
1996-07-19             21
1996-07-20             19
1996-07-22             20
1996-07-23             28
1996-07-24             11

这是我的代码：

```{r, results='asis'}
require(googleVis)

Cal <- gvisCalendar(test, 
                    datevar="DOTVORANJE", 
                    numvar="num_of_clients",
                    options=list(
                      width=900,
                      calendar="{yearLabel: { fontName: 'Times-Roman',
                               fontSize: 32, color: '#1A8763', bold: true},
                               cellSize: 10,
                               cellColor: { stroke: 'red', strokeOpacity: 0.2 },
                               focusedCellColor: {stroke:'red'}}")
)

print(Cal)

我得到的输出是下面的图像

附录：

我最初试图在没有'width = 900'参数的情况下渲染绘图，但是绘图并没有完全填充容器。

此外，我尝试使用'cellSize'参数，这增加了绘图的实际宽度，但在这种情况下，我失去了对绘图高度的控制。例如，如果我增加容器区域Row {data-height = 1500}，则该图再次不会填充它。

如何通过日历获取页面的全宽度？

非常感谢！