各位高手，有一个数据，请问第一列我怎么才能输入呢？我在.csv文件中输入2000-01-13，但是却不能进行运算
> USIncExp
         income expenditure
Jan 1959  382.1       307.1
Feb 1959  384.5       310.5
Mar 1959  387.7       313.7
Apr 1959  391.0       313.2
May 1959  393.9       317.1
Jun 1959  396.3       319.2
Jul 1959  396.5       318.8
Aug 1959  395.0       321.2
Sep 1959  396.2       325.2
Oct 1959  397.8       323.8
Nov 1959  401.2       323.9
Dec 1959  405.7       323.9
Jan 1960  407.0       324.6
Feb 1960  407.7       326.4
Mar 1960  408.6       331.2
Apr 1960  411.3       337.6
May 1960  412.8       331.1
Jun 1960  413.1       331.2
Jul 1960  414.0       332.5
Aug 1960  414.5       332.8
Sep 1960  415.4       334.6
Oct 1960  417.2       336.6
Nov 1960  416.8       336.5
Dec 1960  414.6       332.5

coint.res <- residuals(lm(expenditure ~ income, data = USIncExp2))
coint.res <- lag(ts(coint.res, start = c(1985,12), freq = 12), k = -1)
最后一行命令是什么意思？