当我在r-markdown中编织代码时，处理以下行代码时出现错误：

Question

错误：““ ts”对象必须具有一个或多个观察值“

以下是触发错误的行代码：

## Subset to one observation per week on Mondays at 8:00pm for 2007, 2008 and 2009
Subset_weekly <- filter(newDF3, weekDay == 2 & hour == 20 & minute == 1)

# Create Time Series object with Sub-meter3
tsSM3_070809weekly <- ts(Subset_weekly$Sub_metering_3, frequency = 52, start = c(2007,1))

使用自动绘图功能绘制子仪表3-添加标签，颜色

自动绘图（tsSM3_070809每周，颜色=“红色”，xlab =“时间”，ylab =“瓦特小时”，主=“子表3”）

这仅在我将整个rmarkdown编织到产品html文件时发生。但是，当我大块运行时，似乎可以打印出该图