fix example findVar
optimze rollapply()