Rmd笔记本无法显示具有“difftime”列和零行的表

我发现，当您尝试使用difftime类打印具有零行和零列的表时，Rmd会产生错误。下面是Rmd文件的一个示例：
（我在代码块的末尾插入了反斜杠，所以它将是一个代码块，所以请在本地删除它们）

---
标题：“R笔记本”
输出：html\U笔记本
---
```{r}
图书馆（dplyr）
\```
```{r}
富%
变异（时间差=时间差1-时间差2）
\```
```{r}
福
\```
```{r}
foo%>%切片（0）
#错误：
#函数（…，row.names=NULL，check.rows=FALSE，check.names=TRUE，）中出错：
#参数表示不同的行数：0，1
\```

你知道如何避免这种情况吗？
现在我刚刚将其转换为数值，但difftime更方便

---

提前谢谢！

为什么需要打印0行属性？我不知道实际表中会有多少行。在我的情况下，零行（当两个参数之间没有时间差时）是成功的。这就是我打印它的原因。

---
title: "R Notebook"
output: html_notebook
---

```{r}
library(dplyr)
\```

```{r}
foo <- tibble(
    time_1 = as.Date("2020-04-28"),
    time_2 = as.Date("2020-04-27")
) %>%
    mutate(time_diff = time_1 - time_2)
\```

```{r}
foo
\```


```{r}
foo %>% slice(0)
# Error:
# Error in (function (..., row.names = NULL, check.rows = FALSE, check.names = TRUE,  : 
# arguments imply differing number of rows: 0, 1
\```