<html><body><div style="color:#000; background-color:#fff; font-family:times new roman, new york, times, serif;font-size:12pt"><div><span>Boa noite caros(a) senhores(as) membros</span></div><div><span>Por gentileza alguém poderia me auxliar em um código que a princípio parece ser simples mas nao consegui uma solução</span></div><div><span>Abaixo mostro o codigo e a seguir venho comentando</span></div><div><span>### Codigo R</span></div><div><span>dados<-data.frame(idfuste=seq(1,5), dap=c(8.5, 11.0, 10.5, 17.5, 12.5),<br>ht=c(10, 13, 12.5, 18, 14))<br>dados<br>dados$hi<-seq(0.1, dados$ht, by=0.5)</span></div><div><span>### <br></span></div><div><span>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</span></div><div><span>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<br></span></div><div><span>Em resumo queria um data.frame de saída a partir dos dados de entrada, nesta estrutura</span></div><div><br><span></span></div><div>
</div><table width="256" border="0" cellpadding="0" cellspacing="0"><col style="width: 48pt;" width="64" span="4">
<tbody><tr style="height: 15pt;" height="20">
<td class="xl65" style="height: 15pt; width: 48pt;" width="64" height="20">idfuste</td>
<td class="xl65" style="width: 48pt;" width="64">dap</td>
<td class="xl65" style="width: 48pt;" width="64">ht</td>
<td class="xl65" style="width: 48pt;" width="64">hi</td>
</tr>
<tr style="height: 15pt;" height="20">
<td class="xl65" style="height: 15pt;" height="20">1</td>
<td class="xl65">8,5</td>
<td class="xl65">10</td>
<td class="xl65">0</td>
</tr>
<tr style="height: 15pt;" height="20">
<td class="xl65" style="height: 15pt;" height="20">1</td>
<td class="xl65">8,5</td>
<td class="xl65">10</td>
<td class="xl65">0,5</td>
</tr>
<tr style="height: 15pt;" height="20">
<td class="xl65" style="height: 15pt;" height="20">1</td>
<td class="xl65">8,5</td>
<td class="xl65">10</td>
<td class="xl65">1</td>
</tr>
<tr style="height: 15pt;" height="20">
<td class="xl65" style="height: 15pt;" height="20">1</td>
<td class="xl65">8,5</td>
<td class="xl65">10</td>
<td class="xl65">1,5</td>
</tr>
<tr style="height: 15pt;" height="20">
<td class="xl65" style="height: 15pt;" height="20">1</td>
<td class="xl65">8,5</td>
<td class="xl65">10</td>
<td class="xl65">2</td>
</tr>
<tr style="height: 15pt;" height="20">
<td class="xl65" style="height: 15pt;" height="20">1</td>
<td class="xl65">8,5</td>
<td class="xl65">10</td>
<td class="xl65">2,5</td>
</tr>
<tr style="height: 15pt;" height="20">
<td class="xl65" style="height: 15pt;" height="20">1</td>
<td class="xl65">8,5</td>
<td class="xl65">10</td>
<td class="xl65">3</td>
</tr>
<tr style="height: 15pt;" height="20">
<td class="xl65" style="height: 15pt;" height="20">1</td>
<td class="xl65">8,5</td>
<td class="xl65">10</td>
<td class="xl65">3,5</td>
</tr>
<tr style="height: 15pt;" height="20">
<td class="xl65" style="height: 15pt;" height="20">1</td>
<td class="xl65">8,5</td>
<td class="xl65">10</td>
<td class="xl65">4</td>
</tr>
<tr style="height: 15pt;" height="20">
<td class="xl65" style="height: 15pt;" height="20">1</td>
<td class="xl65">8,5</td>
<td class="xl65">10</td>
<td class="xl65">4,5</td>
</tr>
<tr style="height: 15pt;" height="20">
<td class="xl65" style="height: 15pt;" height="20">1</td>
<td class="xl65">8,5</td>
<td class="xl65">10</td>
<td class="xl65">5</td>
</tr>
<tr style="height: 15pt;" height="20">
<td class="xl65" style="height: 15pt;" height="20">1</td>
<td class="xl65">8,5</td>
<td class="xl65">10</td>
<td class="xl65">5,5</td>
</tr>
<tr style="height: 15pt;" height="20">
<td class="xl65" style="height: 15pt;" height="20">1</td>
<td class="xl65">8,5</td>
<td class="xl65">10</td>
<td class="xl65">6</td>
</tr>
<tr style="height: 15pt;" height="20">
<td class="xl65" style="height: 15pt;" height="20">1</td>
<td class="xl65">8,5</td>
<td class="xl65">10</td>
<td class="xl65">6,5</td>
</tr>
<tr style="height: 15pt;" height="20">
<td class="xl65" style="height: 15pt;" height="20">1</td>
<td class="xl65">8,5</td>
<td class="xl65">10</td>
<td class="xl65">7</td>
</tr>
<tr style="height: 15pt;" height="20">
<td class="xl65" style="height: 15pt;" height="20">1</td>
<td class="xl65">8,5</td>
<td class="xl65">10</td>
<td class="xl65">7,5</td>
</tr>
<tr style="height: 15pt;" height="20">
<td class="xl65" style="height: 15pt;" height="20">1</td>
<td class="xl65">8,5</td>
<td class="xl65">10</td>
<td class="xl65">8</td>
</tr>
<tr style="height: 15pt;" height="20">
<td class="xl65" style="height: 15pt;" height="20">1</td>
<td class="xl65">8,5</td>
<td class="xl65">10</td>
<td class="xl65">8,5</td>
</tr>
<tr style="height: 15pt;" height="20">
<td class="xl65" style="height: 15pt;" height="20">1</td>
<td class="xl65">8,5</td>
<td class="xl65">10</td>
<td class="xl65">9</td>
</tr>
<tr style="height: 15pt;" height="20">
<td class="xl65" style="height: 15pt;" height="20">1</td>
<td class="xl65">8,5</td>
<td class="xl65">10</td>
<td class="xl65">9,5</td>
</tr>
<tr style="height: 15pt;" height="20">
<td class="xl65" style="height: 15pt;" height="20">1</td>
<td class="xl65">8,5</td>
<td class="xl65">10</td>
<td class="xl65">10</td>
</tr>
<tr style="height: 15pt;" height="20">
<td class="xl65" style="height: 15pt;" height="20">2</td>
<td class="xl65">11</td>
<td class="xl65">13,2</td>
<td class="xl65">0</td>
</tr>
<tr style="height: 15pt;" height="20">
<td class="xl65" style="height: 15pt;" height="20">2</td>
<td class="xl65">11</td>
<td class="xl65">13,2</td>
<td class="xl65">0,5</td>
</tr>
<tr style="height: 15pt;" height="20">
<td class="xl65" style="height: 15pt;" height="20">2</td>
<td class="xl65">11</td>
<td class="xl65">13,2</td>
<td class="xl65">1</td>
</tr>
<tr style="height: 15pt;" height="20">
<td class="xl65" style="height: 15pt;" height="20">2</td>
<td class="xl65">11</td>
<td class="xl65">13,2</td>
<td class="xl65">1,5</td>
</tr>
<tr style="height: 15pt;" height="20">
<td class="xl65" style="height: 15pt;" height="20">2</td>
<td class="xl65">11</td>
<td class="xl65">13,2</td>
<td class="xl65">2</td>
</tr>
<tr style="height: 15pt;" height="20">
<td class="xl65" style="height: 15pt;" height="20">2</td>
<td class="xl65">11</td>
<td class="xl65">13,2</td>
<td class="xl65">2,5</td>
</tr>
<tr style="height: 15pt;" height="20">
<td class="xl65" style="height: 15pt;" height="20">2</td>
<td class="xl65">11</td>
<td class="xl65">13,2</td>
<td class="xl65">3</td>
</tr>
<tr style="height: 15pt;" height="20">
<td class="xl65" style="height: 15pt;" height="20">2</td>
<td class="xl65">11</td>
<td class="xl65">13,2</td>
<td class="xl65">3,5</td>
</tr>
<tr style="height: 15pt;" height="20">
<td class="xl65" style="height: 15pt;" height="20">2</td>
<td class="xl65">11</td>
<td class="xl65">13,2</td>
<td class="xl65">4</td>
</tr>
<tr style="height: 15pt;" height="20">
<td class="xl65" style="height: 15pt;" height="20">2</td>
<td class="xl65">11</td>
<td class="xl65">13,2</td>
<td class="xl65">4,5</td>
</tr>
<tr style="height: 15pt;" height="20">
<td class="xl65" style="height: 15pt;" height="20">2</td>
<td class="xl65">11</td>
<td class="xl65">13,2</td>
<td class="xl65">5</td>
</tr>
<tr style="height: 15pt;" height="20">
<td class="xl65" style="height: 15pt;" height="20">2</td>
<td class="xl65">11</td>
<td class="xl65">13,2</td>
<td class="xl65">5,5</td>
</tr>
<tr style="height: 15pt;" height="20">
<td class="xl65" style="height: 15pt;" height="20">2</td>
<td class="xl65">11</td>
<td class="xl65">13,2</td>
<td class="xl65">6</td>
</tr>
<tr style="height: 15pt;" height="20">
<td class="xl65" style="height: 15pt;" height="20">2</td>
<td class="xl65">11</td>
<td class="xl65">13,2</td>
<td class="xl65">6,5</td>
</tr>
<tr style="height: 15pt;" height="20">
<td class="xl65" style="height: 15pt;" height="20">2</td>
<td class="xl65">11</td>
<td class="xl65">13,2</td>
<td class="xl65">7</td>
</tr>
<tr style="height: 15pt;" height="20">
<td class="xl65" style="height: 15pt;" height="20">2</td>
<td class="xl65">11</td>
<td class="xl65">13,2</td>
<td class="xl65">7,5</td>
</tr>
<tr style="height: 15pt;" height="20">
<td class="xl65" style="height: 15pt;" height="20">2</td>
<td class="xl65">11</td>
<td class="xl65">13,2</td>
<td class="xl65">8</td>
</tr>
<tr style="height: 15pt;" height="20">
<td class="xl65" style="height: 15pt;" height="20">2</td>
<td class="xl65">11</td>
<td class="xl65">13,2</td>
<td class="xl65">8,5</td>
</tr>
<tr style="height: 15pt;" height="20">
<td class="xl65" style="height: 15pt;" height="20">2</td>
<td class="xl65">11</td>
<td class="xl65">13,2</td>
<td class="xl65">9</td>
</tr>
<tr style="height: 15pt;" height="20">
<td class="xl65" style="height: 15pt;" height="20">2</td>
<td class="xl65">11</td>
<td class="xl65">13,2</td>
<td class="xl65">9,5</td>
</tr>
<tr style="height: 15pt;" height="20">
<td class="xl65" style="height: 15pt;" height="20">2</td>
<td class="xl65">11</td>
<td class="xl65">13,2</td>
<td class="xl65">10</td>
</tr>
<tr style="height: 15pt;" height="20">
<td class="xl65" style="height: 15pt;" height="20">2</td>
<td class="xl65">11</td>
<td class="xl65">13,2</td>
<td class="xl65">10,5</td>
</tr>
<tr style="height: 15pt;" height="20">
<td class="xl65" style="height: 15pt;" height="20">2</td>
<td class="xl65">11</td>
<td class="xl65">13,2</td>
<td class="xl65">11</td>
</tr>
<tr style="height: 15pt;" height="20">
<td class="xl65" style="height: 15pt;" height="20">2</td>
<td class="xl65">11</td>
<td class="xl65">13,2</td>
<td class="xl65">11,5</td>
</tr>
<tr style="height: 15pt;" height="20">
<td class="xl65" style="height: 15pt;" height="20">2</td>
<td class="xl65">11</td>
<td class="xl65">13,2</td>
<td class="xl65">12</td>
</tr>
<tr style="height: 15pt;" height="20">
<td class="xl65" style="height: 15pt;" height="20">2</td>
<td class="xl65">11</td>
<td class="xl65">13,2</td>
<td class="xl65">12,5</td>
</tr>
<tr style="height: 15pt;" height="20">
<td class="xl65" style="height: 15pt;" height="20">2</td>
<td class="xl65">11</td>
<td class="xl65">13,2</td>
<td class="xl65">13</td>
</tr>
<tr style="height: 15pt;" height="20">
<td class="xl65" style="height: 15pt;" height="20">2</td>
<td class="xl65">11</td>
<td class="xl65">13,2</td>
<td class="xl65">13,2</td>
</tr>
</tbody></table><div><br>e assim por diante para todos idfustes<br>Desde já agradeço<br>Para quem é da area florestal estou tentando estruturar uma base de cubagem a partir de dados de parcelas<br>Abraço e boa noite a todos<br>Att,<br>Samuel<br> <span></span></div><div style="font-family: courier,monaco,monospace,sans-serif;"><font size="3"><b>====================================</b></font></div><div style="font-family: courier,monaco,monospace,sans-serif;"><font size="3"><b>Samuel P. C. Carvalho<br></b><font color="#000000" size="2">Mestre em Ciências Florestais [UFLA]</font></font></div><div style="font-family: courier,monaco,monospace,sans-serif;"><font color="#000000" size="2">Doutorando em Recursos Florestais [ESALQ/USP]</font></div><div style="font-family: courier,monaco,monospace,sans-serif;"><font size="2">=============================================</font></div></div></body></html>