[R-br] Fwd: Juntando vários objetos dentro de list em loop [CORRIGIDO]

[Benilton Carvalho]

split(as.data.frame(coordV), rep(1:nrow(coordV), each=4,
length.out=nrow(coordV)))

b

2012/7/2 ASANTOS <alexandresantosbr em yahoo.com.br>:
> Desculpe cometi alguns erro em meu CMR, segue corrigido
>
>        Tento um objeto chamado coordV que representa um data frame com
> as coordenada dos vértices de varias parcelas, sendo que a cada 4 linhas
> tenho as coordenadas de cada parcela, as quais eu gostaria de armazenar
> separadamente dentro de um list, mais não tenho conseguido não, alguém
> poderia me dar um help, suspeito que o rbind() no loop não seja a função
> adequada, substituí por list e não deu certo também, segue CMR:
>
> ### Coordenada X dos vértices
> xV<-c(672016,672056,672056,672016,672312,672352,672352,672312,672654,672694,672694,672654,672059,672099,672099,672059)
>
> ### Coordenada Y dos vértices
> yV<-c(6783670,6783670,6783630,6783630,6784125,6784125,6784085,6784085,6783490,6783490,6783450,6783450,6782374,6782374,6782334,6782334)
>
> coordV<-cbind(xV,yV)### Juntado as coordenadas
>
>
> ### cada parcela é formada pelo intervalo de a cada 4 valores e desejo criar
> um objeto [[]] in list para cada parcela, então:
>
> x<-seq(1,length(p.central),4)### Valor inicial do intervalo
> y<-seq(4,length(p.central),4)### Valor final do intervalo
>
> inter<-cbind(x,y) ##Juntado o intervalo a cada quatro linhas
>
>
> ### Criar um objeto list a cada 4 coordenadas
>
> coordV_gr <-NULL
>     for(j in 1:(length(inter))){
>
> coordV_gr <- rbind(coordV_gr, list(coordV[inter[,1]:inter[,2],]))
> }
> coordV_gr##Resultado
>
> --
> Alexandre dos Santos
> Engenheiro Florestal, Dr.
> Universidade Federal de Lavras
> Departamento de Entomologia
> Laboratório de Entomologia Florestal
> Caixa Postal 3037
> 37200-000 - Lavras/MG
> Fone: +55 (35) 9223-0304
>
> _______________________________________________
> R-br mailing list
> R-br em listas.c3sl.ufpr.br
> https://listas.inf.ufpr.br/cgi-bin/mailman/listinfo/r-br
> Leia o guia de postagem (http://www.leg.ufpr.br/r-br-guia) e forneça código
> mínimo reproduzível.
>
>
>
>
> _______________________________________________
> R-br mailing list
> R-br em listas.c3sl.ufpr.br
> https://listas.inf.ufpr.br/cgi-bin/mailman/listinfo/r-br
> Leia o guia de postagem (http://www.leg.ufpr.br/r-br-guia) e forneça código
> mínimo reproduzível.