[R-br] modifica dataframe

[Eder David Borges da Silva]

Continuando a saga Dallazuanna sua resposta pode ser escrita em uma linha,
apenas encapisulando o x.....
Como diz o Walmes, "Homen de uma linha só...."
Isso ai...

Em 1 de junho de 2011 12:12, Gustavo Henrique de Carvalho <
gustavo.bio em gmail.com> escreveu:

> Hehehe, o único problema com a forma que o Henrique postou é que com
> ela a última observação do hi não é igual ao ht quanto esse não é
> divisível por 0.5.
>
> 2011/6/1 Paulo Justiniano <paulojus em leg.ufpr.br>:
> > é Benilton vc estava certo... pode até tardar, mas não falha!
> > Mesmo de casa nova..... não deixa passar
> >
> > abracos
> >
> > On Tue, 31 May 2011, Henrique Dallazuanna wrote:
> >
> >> Samuel,
> >> Tente assim tbm:
> >>
> >> x <- sapply(dados$ht, seq, from = 0, by = 0.5)
> >> transform(dados[rep(seq(nrow(dados)), times = sapply(x, length)),], hi =
> >> unlist(x))
> >>
> >> 2011/5/31 Samuel Carvalho <samukajm em yahoo.com.br>
> >>      Boa noite caros(a) senhores(as) membros
> >> Por gentileza alguém poderia me auxliar em um código que a princípio
> >> parece ser simples mas nao consegui uma
> >> solução
> >> Abaixo mostro o codigo e a seguir venho comentando
> >> ### Codigo R
> >> dados<-data.frame(idfuste=seq(1,5), dap=c(8.5, 11.0, 10.5, 17.5, 12.5),
> >> ht=c(10, 13, 12.5, 18, 14))
> >> dados
> >> dados$hi<-seq(0.1, dados$ht, by=0.5)
> >> ###
> >> O que preciso é gerar uma sequencia para cada "idfuste" de 0.1 até a
> "ht"
> >> que corresponde aquele "idfuste",
> >> replicando também cada observação
> >> para cada "idfuste". A sequencia é de 0.5 em 0.5 até a altura total da
> >> árvore - 1 pois esta pode nao ser um
> >> número inteiro dividido por 0.5 sendo que a ultima observação de cada
> >> idfuste deve ser igual ao valor de ht
> >> Em resumo queria um data.frame de saída a partir dos dados de entrada,
> >> nesta estrutura
> >>
> >> idfuste
> >> dap
> >> ht
> >> hi
> >> 1
> >> 8,5
> >> 10
> >> 0
> >> 1
> >> 8,5
> >> 10
> >> 0,5
> >> 1
> >> 8,5
> >> 10
> >> 1
> >> 1
> >> 8,5
> >> 10
> >> 1,5
> >> 1
> >> 8,5
> >> 10
> >> 2
> >> 1
> >> 8,5
> >> 10
> >> 2,5
> >> 1
> >> 8,5
> >> 10
> >> 3
> >> 1
> >> 8,5
> >> 10
> >> 3,5
> >> 1
> >> 8,5
> >> 10
> >> 4
> >> 1
> >> 8,5
> >> 10
> >> 4,5
> >> 1
> >> 8,5
> >> 10
> >> 5
> >> 1
> >> 8,5
> >> 10
> >> 5,5
> >> 1
> >> 8,5
> >> 10
> >> 6
> >> 1
> >> 8,5
> >> 10
> >> 6,5
> >> 1
> >> 8,5
> >> 10
> >> 7
> >> 1
> >> 8,5
> >> 10
> >> 7,5
> >> 1
> >> 8,5
> >> 10
> >> 8
> >> 1
> >> 8,5
> >> 10
> >> 8,5
> >> 1
> >> 8,5
> >> 10
> >> 9
> >> 1
> >> 8,5
> >> 10
> >> 9,5
> >> 1
> >> 8,5
> >> 10
> >> 10
> >> 2
> >> 11
> >> 13,2
> >> 0
> >> 2
> >> 11
> >> 13,2
> >> 0,5
> >> 2
> >> 11
> >> 13,2
> >> 1
> >> 2
> >> 11
> >> 13,2
> >> 1,5
> >> 2
> >> 11
> >> 13,2
> >> 2
> >> 2
> >> 11
> >> 13,2
> >> 2,5
> >> 2
> >> 11
> >> 13,2
> >> 3
> >> 2
> >> 11
> >> 13,2
> >> 3,5
> >> 2
> >> 11
> >> 13,2
> >> 4
> >> 2
> >> 11
> >> 13,2
> >> 4,5
> >> 2
> >> 11
> >> 13,2
> >> 5
> >> 2
> >> 11
> >> 13,2
> >> 5,5
> >> 2
> >> 11
> >> 13,2
> >> 6
> >> 2
> >> 11
> >> 13,2
> >> 6,5
> >> 2
> >> 11
> >> 13,2
> >> 7
> >> 2
> >> 11
> >> 13,2
> >> 7,5
> >> 2
> >> 11
> >> 13,2
> >> 8
> >> 2
> >> 11
> >> 13,2
> >> 8,5
> >> 2
> >> 11
> >> 13,2
> >> 9
> >> 2
> >> 11
> >> 13,2
> >> 9,5
> >> 2
> >> 11
> >> 13,2
> >> 10
> >> 2
> >> 11
> >> 13,2
> >> 10,5
> >> 2
> >> 11
> >> 13,2
> >> 11
> >> 2
> >> 11
> >> 13,2
> >> 11,5
> >> 2
> >> 11
> >> 13,2
> >> 12
> >> 2
> >> 11
> >> 13,2
> >> 12,5
> >> 2
> >> 11
> >> 13,2
> >> 13
> >> 2
> >> 11
> >> 13,2
> >> 13,2
> >> e assim por diante para todos idfustes
> >> Desde já agradeço
> >> Para quem é da area florestal estou tentando estruturar uma base de
> >> cubagem a partir de dados de parcelas
> >> Abraço e boa noite a todos
> >> Att,
> >> Samuel
> >>
> >> ====================================
> >> Samuel P. C. Carvalho
> >> Mestre em Ciências Florestais [UFLA]
> >> Doutorando em Recursos Florestais [ESALQ/USP]
> >> =============================================
> >>
> >> _______________________________________________
> >> R-br mailing list
> >> R-br em listas.c3sl.ufpr.br
> >> https://listas.inf.ufpr.br/cgi-bin/mailman/listinfo/r-br
> >>
> >>
> >>
> >>
> >> --
> >> Henrique Dallazuanna
> >> Curitiba-Paraná-Brasil
> >> 25° 25' 40" S 49° 16' 22" O
> >>
> >
> > _______________________________________________
> > R-br mailing list
> > R-br em listas.c3sl.ufpr.br
> > https://listas.inf.ufpr.br/cgi-bin/mailman/listinfo/r-br
> >
> >
> _______________________________________________
> R-br mailing list
> R-br em listas.c3sl.ufpr.br
> https://listas.inf.ufpr.br/cgi-bin/mailman/listinfo/r-br
>
-------------- Próxima Parte ----------
Um anexo em HTML foi limpo...
URL: <http://listas.inf.ufpr.br/pipermail/r-br/attachments/20110601/f76accdf/attachment.html>