erm... ainda não é isso. Um exemplo do que está acontecendo:

ind[[1236]]
a[ind[[1236]],]
rollmean(a$y[ind[[1236]]],k=3)
as.numeric(filter(a$y[ind[[1236]]],rep(1/3,3)))
a.2.1[ind[[1236]],]
a.3.1[ind[[1236]],]



De: Benilton Carvalho <beniltoncarvalho@gmail.com>
Para: r-br@listas.c3sl.ufpr.br; Rubem Kaipper Ceratti <rubem_ceratti@yahoo.com.br>
Enviadas: Terça-feira, 1 de Novembro de 2011 9:28
Assunto: Re: [R-br] Problemas com split+lapply

os NAs sao na primeira e ultima posicao.