Re: [R-br] Cálculo do CAP com base na repetição da árvore

2018-11-05 Por tôpico Marcelo Laia por (R-br)
On 04/11/18 at 07:17, Mauro Sznelwar por (R-br) wrote:
> 
> 
> 
> 
> 
> 
> 
> 
>Por que não estou conseguindo rodar isto?
> 
> 
> 
>> dados <- textConnection("Bloco Clone Esp Arv CAP HT
> 
>+ + 1 A 3x3 1 12,5 18
> 

Você passou os dados com o caracter + ou sem o +?

Parece-me que você copiou os dados com o caracter + e aí pode estar a causa do
insucesso.
 

-- 
Marcelo
___
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 fornea cdigo mnimo 
reproduzvel.

Re: [R-br] Cálculo do CAP com base na repetição da árvore

2018-11-04 Por tôpico Mauro Sznelwar por (R-br)
 
> Marcelo, acredito que isso pode te ajudar...> Sim! Ajuda e muito, Caio!Testei aqui e funcionou!Vou fazer alguma modificação para rodar no banco todo. Como tenho 6 blocos,haverá outras combinações. Assim, penso em rodar algo do tipo:x$COVA <- paste(x$Bloco, x$Clone, x$Esp, x$Arv, sep = ";")attach(x)CAPcalc <- tapply(CAP, COVA, CAP.sqrt)data.frame(CAPcalc) CAPcalc1;A;3x3;1 12.51;A;3x3;2 14.933521;A;3x3;3 19.01;A;3x3;4 19.01;A;3x3;5 9.01;A;3x3;6 30.907121;A;3x3;7 8.0write.table(CAPcalc, "CAPcalc.txt")Substituo o ";" por tabulação utilizando o Gedit ou Emacs.Valeu!Laia, MLAi, eu utilizo o seguinte para separar a primeira coluna:-- Marcelo___R-br mailing listR-br@listas.c3sl.ufpr.brhttps://listas.inf.ufpr.br/cgi-bin/mailman/listinfo/r-brLeia o guia de postagem (http://www.leg.ufpr.br/r-br-guia) e fornea cdigo mnimo reproduzvel.___
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.

Re: [R-br] Cálculo do CAP com base na repetição da árvore

2018-11-04 Por tôpico Marcelo Laia por (R-br)
On 03/11/18 at 02:45, Caio Corrêa wrote:
> Marcelo, acredito que isso pode te ajudar...
> 

Sim! Ajuda e muito, Caio!

Testei aqui e funcionou!

Vou fazer alguma modificação para rodar no banco todo. Como tenho 6 blocos,
haverá outras combinações. Assim, penso em rodar algo do tipo:

x$COVA <- paste(x$Bloco, x$Clone, x$Esp, x$Arv, sep = ";")

attach(x)

CAPcalc <- tapply(CAP, COVA, CAP.sqrt)

data.frame(CAPcalc)
   CAPcalc
1;A;3x3;1 12.5
1;A;3x3;2 14.93352
1;A;3x3;3 19.0
1;A;3x3;4 19.0
1;A;3x3;5  9.0
1;A;3x3;6 30.90712
1;A;3x3;7  8.0

write.table(CAPcalc, "CAPcalc.txt")

Substituo o ";" por tabulação utilizando o Gedit ou Emacs.

Valeu!

Laia, ML

Ai, eu utilizo o seguinte para separar a primeira coluna:




-- 
Marcelo
___
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 fornea cdigo mnimo 
reproduzvel.

[R-br] Cálculo do CAP com base na repetição da árvore

2018-11-03 Por tôpico Marcelo Laia por (R-br)
Bom dia!

Em Engenharia Florestal é comum termos numa mesma cova duas ou mais hastes
(árvores), a qual chamamos de bifurcadas (para duas), trifurcadas (para três),
etc..

Assim, podemos ter o seguinte:

Bloco Clone  Esp Arv   CAP  HT
1   A3x3   1   12,5 18
1   A3x3   2   10,1 11
1   A3x3   2   11   11,5
1   A3x3   3   19   21
1   A3x3   4   19   20
1   A3x3   5   9 8
1   A3x3   6   1817
1   A3x3   6   1718
1   A3x3   6   18,5  17,5
1   A3x3   7   8 10
(...)
5   C6x1,5 66  2021
(...)
6   E6x1,5 66  1819


Para prosseguir com os cálculos, é comum reduzir as plantas bifurcadas,
trifurcadas e quadrifurcadas a uma única planta, da seguinte maneira:

CAP = RAIZ(CAP1^2 + CAP2^2 + CAPn^2)

Assim, o exemplo acima ficaria assim:

CAPcalc = RAIZ(10,1^2+11^2) = 14,93

CAPcalc = RAIZ(18^2 + 17^2 + 18,5^2)

Bloco Clone  Esp Arv   CAP  HT CAPcalc
1   A3x3   1   12,5 18
1   A3x3   2   10,1 11 14,93
1   A3x3   2   11   11,5
1   A3x3   3   19   21
1   A3x3   4   19   20
1   A3x3   5   9 8
1   A3x3   6   181730,91
1   A3x3   6   1718
1   A3x3   6   18,5  17,5
1   A3x3   7   8 10
(...)
5   C6x1,5 66  2021
(...)
6   E6x1,5 66  1819

São seis blocos, cinco clones diferentes e seis espaçamentos.

Pergunto: alguém já otimizou isso no R? Tenho 7.473 linhas de dados para
analisar e já fiz isso na unha (Calc Libreoffice) para os 3 anos anteriores.
Como ainda teremos mais 3 anos de medição desse experimento, estou buscando
ajuda. Não tenho nenhum código em mente para enviar. O pedido de ajuda para
este caso e para o outro que irei enviar em seguida parte do zero.

Obrigado

-- 
Marcelo
___
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 fornea cdigo mnimo 
reproduzvel.