Применение мин/макс по запаздывающим сериям объекта xts/zoo

Question

max столбца Close, но почему именно max с запаздыванием Закрыть NA?

> library(quantmod) 
> s <- get(getSymbols('nvmi')) 
> max(Cl(s)) 
[1] 11.48 
> max(Lag(Cl(s))) 
[1] NA 
> max(as.numeric(Lag(Cl(s)))) 
[1] NA 

Answer 1

Потому что Lag подушечки с NA по умолчанию. Используйте na.rm=TRUE в своем обращении к max.

> head(Cl(s)) 
      NVMI.Close 
2007-01-03  2.60 
2007-01-04  2.59 
2007-01-05  2.70 
2007-01-08  2.60 
2007-01-09  2.47 
2007-01-10  2.42 
> head(Lag(Cl(s))) 
      Lag.1 
2007-01-03 NA 
2007-01-04 2.60 
2007-01-05 2.59 
2007-01-08 2.70 
2007-01-09 2.60 
2007-01-10 2.47 
> max(Lag(Cl(s)), na.rm=TRUE) 
[1] 11.48