R绘图：如何在绘图区域中添加水平空间？

我正在使用

R

中的

plot\u ly

创建折线图。默认情况下，直线向右延伸至打印区域的左边缘和右边缘。我想在这里添加一些空格，默认情况下在

ggplot

中是这样做的。有人知道如何使用

plot\u ly

可复制示例：

df <- data.frame(date = seq(as.Date('2021-01-01'), length=50, by='day'),
                 value = rnorm(50))

plot_ly(df, x=~date, y=~value) %>% 
  add_lines(color=I('black')) %>% 
  layout(title = 'plot_ly', plot_bgcolor = 'E9E9E9')

ggplot(df, aes(x=date, y=value)) +
  geom_line() +
  ggtitle('ggplot')

df%
添加线（颜色=I（'黑色'））%>%
布局（标题='plot_ly'，plot_bgcolor='E9E9E9'）
ggplot（df，aes（x=日期，y=值））+
geom_线（）+
ggtitle（'ggplot'）

我想添加以下带有红色箭头的空间：

---

您可以在

xaxis

中设置

范围：

library(plotly)

plot_ly(df, x=~date, y=~value) %>% 
  add_lines(color=I('black')) %>% 
  layout(title = 'plot_ly', plot_bgcolor = 'E9E9E9', 
         xaxis = list(range = c(min(df$date) - 3, max(df$date) + 3)))