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

[ASANTOS]

Obrigado Benilton, problema resolvido.

Em 02/07/2012 10:43, Benilton Carvalho escreveu:
> 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.
> _______________________________________________
> 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.
>


-- 
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