错误于data$brz[1:(td - 1)] : 只有负下标里才能有零

xing10

> data <- data.frame(data)

> td<-length(data$date)

> t<-td-1

> acwr<-250*log(data$acw[2:td]/data$acw[1:(td-1)])

> brzr<-250*log(data$brz[2:td]/data$brz[1:(td-1)])

错误于data$brz[1:(td - 1)] : 只有负下标里才能有零

怎么解决呢

itellin

acwr<-250*diff(log(data$acw))