split(as.data.frame(coordV), rep(1:nrow(coordV), each=4, length.out=nrow(coordV))) b 2012/7/2 ASANTOS <alexandresantosbr@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@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@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.