<table cellspacing="0" cellpadding="0" border="0"><tr><td valign="top"><p dir="ltr"><font size ="2"><font size ="2">Veja writePolyShape ()</font></font></p>
 <table cellspacing="0" cellpadding="0" border="0"> <tbody> <tr> <td valign="top"> <div style="font-family:Roboto, sans-serif;color:#7e7d80;">From:"Hélio Gallo Rocha" <heliogallorocha@gmail.com><br/>Date:Sun, 19 Oct, 2014 at 22:30<br/>Subject:[R-br] skater e deldir<br/><br/></div> <div dir="ltr">Caros da lista,<div><br></div><div>Estou tentando implementar o uso de SKATER do pacote spdep.</div><div>Gostaria de contar com a boa vontade dos listeiros para resolver esta dificuldade.</div><div><br></div><div>Para iniciar o skater tenho de dividir minha área em poligonos.</div><div>Para tal estou usando o pacote deldir. Abaixo um exemplo da própria página CRAN.</div><div><div><br></div><div><br></div><div>require(deldir)</div><div>set.seed(42)</div><div>x <- runif(20)</div><div>y <- runif(20)</div><div>d <- deldir(x,y)</div><div>(ttt <- triang.list(d)  )</div><div>plot(ttt,border="red",showrect=TRUE)</div><div>(sss <-
 tile.list(d))</div><div>plot(sss)</div><div>plot(ttt,add=TRUE,border="blue")</div></div><div><div><br></div><div><br></div><div>O objeto ttt lista os conjuntos de três pontos que formam o poligono</div><div><br></div><div>Teria uma forma automatizada para gerar estes poligonos no formato shape, pois o CRM do skater que tenho utiliza o comando "readShapePoly" do spdep.</div><div><br></div><div>Tentei exportar para o formato XLS, mas não foi possível pois o objeto ttt não é um data.frame</div><div><br></div><div><br></div><div><br></div><div>Agradeço desde já</div>-- <br>Hélio Gallo Rocha<br>IFSULDEMINAS - Câmpus Muzambinho<br>
</div></div></td>  </tr>   </tbody>   </table></td></tr></table>