<html xmlns:v="urn:schemas-microsoft-com:vml" xmlns:o="urn:schemas-microsoft-com:office:office" xmlns:w="urn:schemas-microsoft-com:office:word" xmlns:m="http://schemas.microsoft.com/office/2004/12/omml" xmlns="http://www.w3.org/TR/REC-html40">
<head>
<meta http-equiv=Content-Type content="text/html; charset=utf-8">
<meta name=Generator content="Microsoft Word 12 (filtered medium)">
<!--[if !mso]>
<style>
v\:* {behavior:url(#default#VML);}
o\:* {behavior:url(#default#VML);}
w\:* {behavior:url(#default#VML);}
.shape {behavior:url(#default#VML);}
</style>
<![endif]-->
<style>
<!--
/* Font Definitions */
@font-face
{font-family:Helvetica;
panose-1:2 11 6 4 2 2 2 2 2 4;}
@font-face
{font-family:Helvetica;
panose-1:2 11 6 4 2 2 2 2 2 4;}
@font-face
{font-family:Calibri;
panose-1:2 15 5 2 2 2 4 3 2 4;}
@font-face
{font-family:Tahoma;
panose-1:2 11 6 4 3 5 4 4 2 4;}
@font-face
{font-family:Verdana;
panose-1:2 11 6 4 3 5 4 4 2 4;}
@font-face
{font-family:"Lucida Console";
panose-1:2 11 6 9 4 5 4 2 2 4;}
@font-face
{font-family:Georgia;
panose-1:2 4 5 2 5 4 5 2 3 3;}
/* Style Definitions */
p.MsoNormal, li.MsoNormal, div.MsoNormal
{margin:0cm;
margin-bottom:.0001pt;
font-size:12.0pt;
font-family:"Times New Roman","serif";}
a:link, span.MsoHyperlink
{mso-style-priority:99;
color:blue;
text-decoration:underline;}
a:visited, span.MsoHyperlinkFollowed
{mso-style-priority:99;
color:purple;
text-decoration:underline;}
span.EstiloDeEmail17
{mso-style-type:personal-reply;
font-family:"Calibri","sans-serif";
color:#1F497D;}
.MsoChpDefault
{mso-style-type:export-only;}
@page Section1
{size:612.0pt 792.0pt;
margin:70.85pt 3.0cm 70.85pt 3.0cm;}
div.Section1
{page:Section1;}
-->
</style>
<!--[if gte mso 9]><xml>
<o:shapedefaults v:ext="edit" spidmax="1026" />
</xml><![endif]--><!--[if gte mso 9]><xml>
<o:shapelayout v:ext="edit">
<o:idmap v:ext="edit" data="1" />
</o:shapelayout></xml><![endif]-->
</head>
<body lang=PT-BR link=blue vlink=purple>
<div class=Section1>
<p class=MsoNormal><span style='font-family:"Arial","sans-serif";color:#1F497D'>Tentei
rodar vosso script, mas a partir daí não foi mais, qual o motivo?<o:p></o:p></span></p>
<p class=MsoNormal><span lang=EN-US style='color:#1F497D'>> plot(sss)<o:p></o:p></span></p>
<p class=MsoNormal><span lang=EN-US style='color:#1F497D'>>
polygon(p1,border="green",lwd=3) <o:p></o:p></span></p>
<p class=MsoNormal><span lang=EN-US style='color:#1F497D'>Error in xy.coords(x,
y) : <o:p></o:p></span></p>
<p class=MsoNormal><span lang=EN-US style='color:#1F497D'> 'x' is a list, but
does not have components 'x' and 'y'</span><span lang=EN-US><o:p></o:p></span></p>
<p class=MsoNormal><span lang=EN-US style='font-size:11.0pt;font-family:"Calibri","sans-serif";
color:#1F497D'><o:p> </o:p></span></p>
<p class=MsoNormal><o:p> </o:p></p>
<div>
<p class=MsoNormal>Caros Elias e Rafael.<o:p></o:p></p>
<div>
<p class=MsoNormal><o:p> </o:p></p>
</div>
<div>
<p class=MsoNormal>Rafael, obrigado pelo código, vou testar, mas depois de
conseguir separar os polígonos.<o:p></o:p></p>
</div>
<div>
<p class=MsoNormal>Na realidade é essa a minha dificuldade.<o:p></o:p></p>
</div>
<div>
<p class=MsoNormal><o:p> </o:p></p>
</div>
<div>
<p class=MsoNormal>Fiz uns testes que deram certo, mas estou separando um
polígono por vez, assim fica muito trabalhoso, de uma olhada no código que é a
partir do enviado no primeiro post:<o:p></o:p></p>
</div>
<div>
<div>
<p class=MsoNormal><o:p> </o:p></p>
</div>
<div>
<p class=MsoNormal><o:p> </o:p></p>
</div>
<div>
<p class=MsoNormal>## objeto que possui as coordenadas geradas na função deldir
é o objeto sss<o:p></o:p></p>
</div>
<div>
<p class=MsoNormal><o:p> </o:p></p>
</div>
<div>
<p class=MsoNormal>## coordenadas do poligono 01<o:p></o:p></p>
</div>
<div>
<p class=MsoNormal>(x1 <- sss[[1]][2])<o:p></o:p></p>
</div>
<div>
<p class=MsoNormal>(y1 <- sss[[1]][3])<o:p></o:p></p>
</div>
<div>
<p class=MsoNormal><o:p> </o:p></p>
</div>
<div>
<p class=MsoNormal>## coordenadas do poligono 02<o:p></o:p></p>
</div>
<div>
<p class=MsoNormal>x2 <- sss[[2]][2]<o:p></o:p></p>
</div>
<div>
<p class=MsoNormal>y2 <- sss[[2]][3]<o:p></o:p></p>
</div>
<div>
<p class=MsoNormal>.<o:p></o:p></p>
</div>
<div>
<p class=MsoNormal>.<o:p></o:p></p>
</div>
<div>
<p class=MsoNormal>.<o:p></o:p></p>
</div>
<div>
<p class=MsoNormal>.<o:p></o:p></p>
</div>
<div>
<p class=MsoNormal>. <o:p></o:p></p>
</div>
<div>
<p class=MsoNormal>## coordenadas do poligono 20<o:p></o:p></p>
</div>
<div>
<p class=MsoNormal>x20 <- sss[[20]][2]<o:p></o:p></p>
</div>
<div>
<p class=MsoNormal>y20 <- sss[[20]][3]<o:p></o:p></p>
</div>
<div>
<p class=MsoNormal> <o:p></o:p></p>
</div>
<div>
<p class=MsoNormal>## Agrupando as coordenadas num só objeto<o:p></o:p></p>
</div>
<div>
<p class=MsoNormal>(p1 <-c(x1,y1))<o:p></o:p></p>
</div>
<div>
<p class=MsoNormal> <o:p></o:p></p>
</div>
<div>
<p class=MsoNormal>(p2 <-c(x2,y2))<o:p></o:p></p>
</div>
<div>
<p class=MsoNormal><o:p> </o:p></p>
</div>
<div>
<p class=MsoNormal>(p20 <-c(x20,y20))<o:p></o:p></p>
</div>
</div>
<div>
<p class=MsoNormal><o:p> </o:p></p>
</div>
<div>
<p class=MsoNormal>## visualizando os poligonos<o:p></o:p></p>
</div>
<div>
<p class=MsoNormal>plot(sss)<o:p></o:p></p>
</div>
<div>
<p class=MsoNormal>polygon(p1,border="green",lwd=3) <o:p></o:p></p>
</div>
<div>
<p class=MsoNormal>polygon(p2,border="red",lwd=3) <o:p></o:p></p>
</div>
<div>
<p class=MsoNormal>polygon(p20,border="blue",lwd=3) <o:p></o:p></p>
</div>
<div>
<p class=MsoNormal><o:p> </o:p></p>
</div>
<div>
<p class=MsoNormal>## Os passos seguintes diferem do seu<o:p></o:p></p>
</div>
<div>
<p class=MsoNormal><o:p> </o:p></p>
</div>
<div>
<p class=MsoNormal>## tentativa de gerar um SpatialPolygons, que tem de
estar fechado, ou seja a primeira e a ultima linhas de coordenadas tem de ser a
mesma<o:p></o:p></p>
</div>
<div>
<p class=MsoNormal><o:p> </o:p></p>
</div>
<div>
<div>
<p class=MsoNormal>(x11 <- c(p1$x, p1$x[1]))<o:p></o:p></p>
</div>
<div>
<p class=MsoNormal>(y11 <- c(p1$y, p1$y[1]))<o:p></o:p></p>
</div>
<div>
<p class=MsoNormal><o:p> </o:p></p>
</div>
<div>
<p class=MsoNormal><o:p> </o:p></p>
</div>
<div>
<p class=MsoNormal>(p1 <- cbind(x11,y11))<o:p></o:p></p>
</div>
</div>
<div>
<p class=MsoNormal><o:p> </o:p></p>
</div>
<div>
<p class=MsoNormal>## transformando em SpatialPolygons<o:p></o:p></p>
</div>
<div>
<div>
<p class=MsoNormal>### Passo 1<o:p></o:p></p>
</div>
<div>
<p class=MsoNormal>linep1=Polygon(p1);class(linep1) #Polygon<o:p></o:p></p>
</div>
<div>
<p class=MsoNormal>linep1<o:p></o:p></p>
</div>
<div>
<p class=MsoNormal><o:p> </o:p></p>
</div>
<div>
<p class=MsoNormal><o:p> </o:p></p>
</div>
<div>
<p class=MsoNormal>## Passo 2<o:p></o:p></p>
</div>
<div>
<p class=MsoNormal>linep1a=Polygons(list(linep1),ID="a");class(linep1a)
# Polygons<o:p></o:p></p>
</div>
<div>
<p class=MsoNormal>linep1a<o:p></o:p></p>
</div>
<div>
<p class=MsoNormal><o:p> </o:p></p>
</div>
<div>
<p class=MsoNormal>## Passo 3<o:p></o:p></p>
</div>
<div>
<p class=MsoNormal>linesp=SpatialPolygons(list(linep1a));class(linesp)
#SpatialPolygons<o:p></o:p></p>
</div>
<div>
<p class=MsoNormal>linesp<o:p></o:p></p>
</div>
<div>
<p class=MsoNormal><o:p> </o:p></p>
</div>
<div>
<p class=MsoNormal>## Passo 4<o:p></o:p></p>
</div>
<div>
<p class=MsoNormal>proj4string(linesp) <- CRS("+proj=utm + zone=23s
+datum=WGS84")<o:p></o:p></p>
</div>
<div>
<p class=MsoNormal>summary(linesp)<o:p></o:p></p>
</div>
<div>
<p class=MsoNormal>plot(linesp)<o:p></o:p></p>
</div>
</div>
<div>
<p class=MsoNormal><o:p> </o:p></p>
</div>
<div>
<p class=MsoNormal>Se puder dar uma mão, agradeço desde já..<o:p></o:p></p>
</div>
<div>
<p class=MsoNormal><o:p> </o:p></p>
</div>
<div>
<p class=MsoNormal>Abraço<o:p></o:p></p>
</div>
<div>
<p class=MsoNormal><o:p> </o:p></p>
</div>
<div>
<p class=MsoNormal>Hélio<o:p></o:p></p>
</div>
</div>
<div>
<p class=MsoNormal><o:p> </o:p></p>
<div>
<p class=MsoNormal>Em 20 de outubro de 2014 13:22, Rafael Tieppo [via R-br]
<<a href="mailto:ml-node+s2285057n4663312h40@n4.nabble.com" target="_blank">ml-node+s2285057n4663312h40@n4.nabble.com</a>>
escreveu:<o:p></o:p></p>
<div>
<div>
<p class=MsoNormal style='background:white'><span style='font-size:10.0pt;
font-family:"Lucida Console";color:black'>Hélio,<o:p></o:p></span></p>
</div>
<div>
<p class=MsoNormal><span style='font-size:10.0pt;font-family:"Lucida Console";
color:black'><o:p> </o:p></span></p>
</div>
<div>
<p class=MsoNormal><span style='font-size:10.0pt;font-family:"Lucida Console";
color:black'>Após dividir sua área em polígonos, vc terá um conjunto de
coordenadas, onde cada conjunto será um polígono.<o:p></o:p></span></p>
</div>
<div>
<p class=MsoNormal><span style='font-size:10.0pt;font-family:"Lucida Console";
color:black'>Com esse objeto pronto em forma de lista:<o:p></o:p></span></p>
</div>
<div>
<p class=MsoNormal><span style='font-size:10.0pt;font-family:"Lucida Console";
color:black'><o:p> </o:p></span></p>
</div>
<div>
<p class=MsoNormal><span style='font-size:10.0pt;font-family:"Lucida Console";
color:black'>Passo 1: Formar "Polygons"<o:p></o:p></span></p>
</div>
<div>
<p class=MsoNormal><span style='font-size:10.0pt;font-family:"Lucida Console";
color:black'>POLS <- lapply(1:length(AREAS), function(x)
Polygons(list(Polygon(AREAS[[x]])),<o:p></o:p></span></p>
</div>
<div>
<p class=MsoNormal><span style='font-size:10.0pt;font-family:"Lucida Console";
color:black'> ID = paste("reg", x, sep =
"")))<o:p></o:p></span></p>
</div>
<div>
<p class=MsoNormal><span style='font-size:10.0pt;font-family:"Lucida Console";
color:black'>Passo 2:Converter em "SpatialPolygons"<o:p></o:p></span></p>
</div>
<div>
<p class=MsoNormal><span style='font-size:10.0pt;font-family:"Lucida Console";
color:black'>POLS <- as.SpatialPolygons.PolygonsList(POLS,
proj4string=CRS(as.character(NA)))<o:p></o:p></span></p>
</div>
<div>
<p class=MsoNormal><span style='font-size:10.0pt;font-family:"Lucida Console";
color:black'><o:p> </o:p></span></p>
</div>
<div>
<p class=MsoNormal><span style='font-size:10.0pt;font-family:"Lucida Console";
color:black'>Agora vc já pode usar a função poly2nb()<o:p></o:p></span></p>
</div>
<div>
<p class=MsoNormal><span style='font-size:10.0pt;font-family:"Lucida Console";
color:black'> poly2nb(POLS)<o:p></o:p></span></p>
</div>
<div>
<p class=MsoNormal><span style='font-size:10.0pt;font-family:"Lucida Console";
color:black'><o:p> </o:p></span></p>
</div>
<div>
<p class=MsoNormal><span style='font-size:10.0pt;font-family:"Lucida Console";
color:black'>Tem um tutorial bem detalhado do professor:<o:p></o:p></span></p>
</div>
<div>
<p class=MsoNormal><span style='font-size:10.0pt;font-family:"Lucida Console";
color:black'><a
href="http://www.leg.ufpr.br/~paulojus/embrapa/Rembrapa/Rembrapase31.html"
target="_blank">Classes para dados espaciais: o pacote sp</a><o:p></o:p></span></p>
</div>
<div style='margin-top:3.75pt;margin-bottom:3.75pt'>
<table class=MsoNormalTable border=0 cellspacing=0 cellpadding=0 width=450
style='width:337.5pt;border-collapse:collapse'>
<tr style='height:.75pt'>
<td colspan=8 style='background:#E5E5E5;padding:0cm 0cm 0cm 0cm;height:.75pt'>
<div>
<p class=MsoNormal style='mso-line-height-alt:0pt;background:#E5E5E5'><span
style='font-size:1.0pt'> <o:p></o:p></span></p>
</div>
</td>
</tr>
<tr style='height:4.5pt'>
<td width=1 rowspan=5 style='width:.75pt;background:#E5E5E5;padding:0cm 0cm 0cm 0cm;
height:4.5pt'>
<div>
<p class=MsoNormal style='background:#E5E5E5'><span style='font-size:1.0pt'> <o:p></o:p></span></p>
</div>
</td>
<td width=168 rowspan=5 style='width:126.0pt;background:black;padding:0cm 0cm 0cm 0cm;
height:4.5pt'>
<p class=MsoNormal align=center style='text-align:center'><a
href="http://www.leg.ufpr.br/~paulojus/embrapa/Rembrapa/Rembrapase31.html"
target="_blank"><span style='text-decoration:none'><img border=0 width=168
height=168 id="_x0000_i1025"
src="https://ec.yimg.com/mail?url=http%3A%2F%2Fwww.leg.ufpr.br%2F%7Epaulojus%2Fembrapa%2FRembrapa%2FRembrapa202x.png&t=1413818683&sig=EnbxwD80kyOV.7nKWeJpzw--~B"
alt=image></span></a><o:p></o:p></p>
</td>
<td width=1 rowspan=5 style='width:.75pt;background:#E5E5E5;padding:0cm 0cm 0cm 0cm;
height:4.5pt'>
<div>
<p class=MsoNormal style='background:#E5E5E5'><span style='font-size:1.0pt'> <o:p></o:p></span></p>
</div>
</td>
<td width=14 rowspan=5 style='width:10.5pt;background:white;padding:0cm 0cm 0cm 0cm;
height:4.5pt'>
<div>
<p class=MsoNormal style='background:white'><span style='font-size:14.0pt'> <o:p></o:p></span></p>
</div>
</td>
<td colspan=2 style='background:white;padding:0cm 0cm 0cm 0cm;height:4.5pt'>
<div>
<p class=MsoNormal style='mso-line-height-alt:4.5pt;background:white'><span
style='font-size:6.0pt'> <o:p></o:p></span></p>
</div>
</td>
<td width=20 rowspan=5 style='width:15.0pt;background:white;padding:0cm 0cm 0cm 0cm;
height:4.5pt'>
<div>
<p class=MsoNormal style='mso-line-height-alt:4.5pt;background:white'><span
style='font-size:20.0pt'> <o:p></o:p></span></p>
</div>
</td>
<td width=1 rowspan=5 style='width:.75pt;background:#E5E5E5;padding:0cm 0cm 0cm 0cm;
height:4.5pt'>
<div>
<p class=MsoNormal style='background:#E5E5E5'><span style='font-size:1.0pt'> <o:p></o:p></span></p>
</div>
</td>
</tr>
<tr>
<td width="100%" colspan=2 style='width:100.0%;padding:0cm 0cm 0cm 0cm'>
<div>
<div>
<p class=MsoNormal style='line-height:12.4pt;background:white;word-break:
break-all'><span style='font-family:"Georgia","serif"'><a
href="http://www.leg.ufpr.br/~paulojus/embrapa/Rembrapa/Rembrapase31.html"
target="_blank"><span style='font-size:13.5pt;color:black'>Classes para dados
espaciais: o pacote sp</span></a><o:p></o:p></span></p>
<div>
<p class=MsoNormal style='line-height:15.0pt;background:white;word-break:
break-all'><span style='font-size:10.0pt;font-family:"Georgia","serif";
color:#999999'>[next] [prev] [prev-tail] [tail] [up] 31 Classes para dados
espaciais: o pacote sp <o:p></o:p></span></p>
</div>
</div>
</div>
</td>
</tr>
<tr style='height:3.0pt'>
<td colspan=2 style='background:white;padding:0cm 0cm 0cm 0cm;height:3.0pt'></td>
</tr>
<tr>
<td style='padding:0cm 0cm 0cm 0cm'>
<div>
<p class=MsoNormal><span style='font-size:1.0pt;font-family:"Arial","sans-serif"'><a
href="http://www.leg.ufpr.br/~paulojus/embrapa/Rembrapa/Rembrapase31.html"
target="_blank"><span style='font-size:7.0pt;color:#999999'>View on <b>www.leg.ufpr.br</b></span></a><o:p></o:p></span></p>
</div>
</td>
<td width=100 style='width:75.0pt;padding:0cm 0cm 0cm 0cm'>
<p class=MsoNormal align=right style='text-align:right;line-height:8.25pt'><span
style='font-size:7.0pt;font-family:"Arial","sans-serif";color:#999999'>Preview
by Yahoo</span><span style='font-size:1.0pt;font-family:"Arial","sans-serif"'><o:p></o:p></span></p>
</td>
</tr>
<tr style='height:6.75pt'>
<td colspan=2 style='background:white;padding:0cm 0cm 0cm 0cm;height:6.75pt'></td>
</tr>
<tr style='height:.75pt'>
<td colspan=8 style='background:#E5E5E5;padding:0cm 0cm 0cm 0cm;height:.75pt'>
<div>
<p class=MsoNormal style='mso-line-height-alt:0pt;background:#E5E5E5'><span
style='font-size:1.0pt'> <o:p></o:p></span></p>
</div>
</td>
</tr>
<tr height=0>
<td width=1 style='border:none'></td>
<td width=168 style='border:none'></td>
<td width=1 style='border:none'></td>
<td width=5 style='border:none'></td>
<td width=139 style='border:none'></td>
<td width=128 style='border:none'></td>
<td width=7 style='border:none'></td>
<td width=1 style='border:none'></td>
</tr>
</table>
</div>
<div>
<p class=MsoNormal><span style='font-size:10.0pt;font-family:"Lucida Console";
color:black'><o:p> </o:p></span></p>
</div>
<div>
<p class=MsoNormal style='background:white'><span style='font-size:10.0pt;
font-family:"Lucida Console";color:black'> <o:p></o:p></span></p>
</div>
<div>
<p class=MsoNormal style='margin-bottom:12.0pt;background:white'><b><span
style='font-size:7.5pt;font-family:"Verdana","sans-serif";color:black'>Rafael
Tieppo</span></b><span style='font-size:10.0pt;font-family:"Lucida Console";
color:black'><o:p></o:p></span></p>
</div>
<div>
<p class=MsoNormal style='margin-bottom:12.0pt;background:white'><span
style='font-size:10.0pt;font-family:"Lucida Console";color:black'><o:p> </o:p></span></p>
</div>
<div>
<div>
<div>
<div>
<p class=MsoNormal style='background:white'><span style='font-family:"Arial","sans-serif";
color:black'>On Sunday, October 19, 2014 7:52 PM, "<a
href="http://user/SendEmail.jtp?type=node&node=4663312&i=0"
target="_blank">[hidden email]</a>" <<a
href="http://user/SendEmail.jtp?type=node&node=4663312&i=1"
target="_blank">[hidden email]</a>> wrote:</span><span style='font-family:
"Helvetica","sans-serif";color:black'><o:p></o:p></span></p>
</div>
<p class=MsoNormal style='margin-bottom:12.0pt;background:white'><span
style='font-family:"Helvetica","sans-serif";color:black'><o:p> </o:p></span></p>
<div>
<p class=MsoNormal style='background:white'><span style='font-family:"Helvetica","sans-serif";
color:black'>Enviar submissões para a lista de discussão R-br para <br>
<a
href="http://user/SendEmail.jtp?type=node&node=4663312&i=2"
target="_blank">[hidden email]</a><br>
<br>
Para se cadastrar ou descadastrar via WWW, visite o endereço<br>
<a
href="https://listas.inf.ufpr.br/cgi-bin/mailman/listinfo/r-br" target="_blank">https://listas.inf.ufpr.br/cgi-bin/mailman/listinfo/r-br</a><br>
ou, via email, envie uma mensagem com a palavra 'help' no assunto ou<br>
corpo da mensagem para <br>
<a
href="http://user/SendEmail.jtp?type=node&node=4663312&i=3"
target="_blank">[hidden email]</a><br>
<br>
Você poderá entrar em contato com a pessoa que gerencia a lista pelo<br>
endereço<br>
<a
href="http://user/SendEmail.jtp?type=node&node=4663312&i=4"
target="_blank">[hidden email]</a><br>
<br>
Quando responder, por favor edite sua linha Assunto assim ela será<br>
mais específica que "Re: Contents of R-br digest..."<br>
<br>
<br>
Tópicos de Hoje:<br>
<br>
1. Integral (<a
href="http://user/SendEmail.jtp?type=node&node=4663312&i=5"
target="_blank">[hidden email]</a>)<br>
2. skater e deldir (Hélio Gallo Rocha)<br>
3. Re: Integral (walmes .)<br>
4. Re: Integral (Diogo Ferrari)<br>
<br>
<br>
----------------------------------------------------------------------<br>
<br>
Message: 1<br>
Date: Sun, 19 Oct 2014 17:23:19 -0200<br>
From: <a href="http://user/SendEmail.jtp?type=node&node=4663312&i=6"
target="_blank">[hidden email]</a><br>
To: "<a href="http://user/SendEmail.jtp?type=node&node=4663312&i=7"
target="_blank">[hidden email]</a>" <<a
href="http://user/SendEmail.jtp?type=node&node=4663312&i=8"
target="_blank">[hidden email]</a>><br>
Subject: [R-br] Integral<br>
Message-ID: <<a href="http://user/SendEmail.jtp?type=node&node=4663312&i=9"
target="_blank">[hidden email]</a>><br>
Content-Type: text/plain; charset="iso-8859-1"<br>
<br>
Um anexo em HTML foi limpo...<br>
URL: <<a
href="http://listas.inf.ufpr.br/pipermail/r-br/attachments/20141019/d7d3470d/attachment-0001.html"
target="_blank">http://listas.inf.ufpr.br/pipermail/r-br/attachments/20141019/d7d3470d/attachment-0001.html</a>><br>
-------------- Próxima Parte ----------<br>
Um anexo não-texto foi limpo...<br>
Nome: Integral.jpg<br>
Tipo: image/jpeg<br>
Tamanho: 38510 bytes<br>
Descrição: não disponível<br>
URL: <<a
href="http://listas.inf.ufpr.br/pipermail/r-br/attachments/20141019/d7d3470d/attachment-0001.jpg"
target="_blank">http://listas.inf.ufpr.br/pipermail/r-br/attachments/20141019/d7d3470d/attachment-0001.jpg</a>><br>
<br>
------------------------------<br>
<br>
Message: 2<br>
Date: Sun, 19 Oct 2014 18:29:49 -0200<br>
From: Hélio Gallo Rocha <<a
href="http://user/SendEmail.jtp?type=node&node=4663312&i=10"
target="_blank">[hidden email]</a>><br>
To: r-br <<a href="http://user/SendEmail.jtp?type=node&node=4663312&i=11"
target="_blank">[hidden email]</a>><br>
Subject: [R-br] skater e deldir<br>
Message-ID:<br>
<CA+<a
href="http://user/SendEmail.jtp?type=node&node=4663312&i=12"
target="_blank">[hidden email]</a>><br>
Content-Type: text/plain; charset="utf-8"<o:p></o:p></span></p>
<div>
<div>
<p class=MsoNormal style='background:white'><span style='font-family:"Helvetica","sans-serif";
color:black'><br>
<br>
Caros da lista,<br>
<br>
Estou tentando implementar o uso de SKATER do pacote spdep.<br>
Gostaria de contar com a boa vontade dos listeiros para resolver esta<br>
dificuldade.<br>
<br>
Para iniciar o skater tenho de dividir minha área em poligonos.<br>
Para tal estou usando o pacote deldir. Abaixo um exemplo da própria página<br>
CRAN.<br>
<br>
<br>
require(deldir)<br>
set.seed(42)<br>
x <- runif(20)<br>
y <- runif(20)<br>
d <- deldir(x,y)<br>
(ttt <- triang.list(d) )<br>
plot(ttt,border="red",showrect=TRUE)<br>
(sss <- tile.list(d))<br>
plot(sss)<br>
plot(ttt,add=TRUE,border="blue")<br>
<br>
<br>
O objeto ttt lista os conjuntos de três pontos que formam o poligono<br>
<br>
Teria uma forma automatizada para gerar estes poligonos no formato shape,<br>
pois o CRM do skater que tenho utiliza o comando "readShapePoly" do
spdep.<br>
<br>
Tentei exportar para o formato XLS, mas não foi possível pois o objeto ttt<br>
não é um data.frame<br>
<br>
<br>
<br>
Agradeço desde já<br>
-- <br>
Hélio Gallo Rocha<br>
IFSULDEMINAS - Câmpus Muzambinho<o:p></o:p></span></p>
</div>
</div>
<p class=MsoNormal style='margin-bottom:12.0pt;background:white'><span
style='font-family:"Helvetica","sans-serif";color:black'>-------------- Próxima
Parte ----------<br>
Um anexo em HTML foi limpo...<br>
URL: <<a
href="http://listas.inf.ufpr.br/pipermail/r-br/attachments/20141019/e658abd9/attachment-0001.html"
target="_blank">http://listas.inf.ufpr.br/pipermail/r-br/attachments/20141019/e658abd9/attachment-0001.html</a>><br>
<br>
------------------------------<br>
<br>
Message: 3<br>
Date: Sun, 19 Oct 2014 19:40:44 -0200<br>
From: "walmes ." <<a
href="http://user/SendEmail.jtp?type=node&node=4663312&i=13"
target="_blank">[hidden email]</a>><br>
To: <a href="http://user/SendEmail.jtp?type=node&node=4663312&i=14"
target="_blank">[hidden email]</a><br>
Subject: Re: [R-br] Integral<br>
Message-ID:<br>
<CAFU=EkZ_E8hLAgXoUk79T7u6qpi4LLtbqrNAvjCXx+<a
href="http://user/SendEmail.jtp?type=node&node=4663312&i=15"
target="_blank">[hidden email]</a>><br>
Content-Type: text/plain; charset="utf-8"<br>
<br>
?<br>
Eu gosto muito de desafios de cálculo mas aprecio muito mais o desafio<br>
quando sei do que se trata, quando tem contexto. Você não forneceu nenhum.<br>
Meu julgamento adivinhatório de imprecisão acha que tem a ver com<br>
estatísticas de ordem. Essa lista tem a prerrogativa de não resolver<br>
problemas de sala de aula para não tirar do aluno o privilégio do<br>
conhecimento a se adquirir em resolvê-lo. Espero que não seja esse o caso.<br>
A lista também pede para não encaminhar conteúdo em anexo. Como se trata de<br>
uma sequência de desenvolvimento matemático, um opção seria fazer no<br>
eqneditor (<a href="http://www.codecogs.com/latex/eqneditor.php" target="_blank">http://www.codecogs.com/latex/eqneditor.php</a>)
e colar o código<br>
latex correspondente, como por exemplo esse código<br>
<br>
\begin{align*}<br>
f(x) &= \theta_y+\theta_2 (x-\theta_x)^2 \\<br>
&= \theta_y+\theta_2 (x^2-2\theta_x x+\theta_x^2)\\<br>
&=<br>
\underbrace{(\theta_y+\theta_2\theta_x^2)}_{\beta_0}-\underbrace{2\theta_2\theta_x}_{-\beta_1}<br>
x+\underbrace{\theta_2}_{\beta_2} x^2\\<br>
&= \beta_0+\beta_1 x+\beta_2 x^2<br>
\end{align*}<br>
<br>
Aí a coisa funciona como CMR, onde o código é latex. É só recortar esse<br>
código e colar no eqneditor. O mais experts em latex podem editar sem<br>
precisar renderizar, inclusive.<br>
<br>
À disposição.<br>
Walmes.<br>
-------------- Próxima Parte ----------<br>
Um anexo em HTML foi limpo...<br>
URL: <<a
href="http://listas.inf.ufpr.br/pipermail/r-br/attachments/20141019/587e8e00/attachment-0001.html"
target="_blank">http://listas.inf.ufpr.br/pipermail/r-br/attachments/20141019/587e8e00/attachment-0001.html</a>><br>
<br>
------------------------------<br>
<br>
Message: 4<br>
Date: Sun, 19 Oct 2014 17:52:04 -0400<br>
From: Diogo Ferrari <<a
href="http://user/SendEmail.jtp?type=node&node=4663312&i=16"
target="_blank">[hidden email]</a>><br>
To: <a href="http://user/SendEmail.jtp?type=node&node=4663312&i=17"
target="_blank">[hidden email]</a><br>
Subject: Re: [R-br] Integral<br>
Message-ID: <<a href="http://user/SendEmail.jtp?type=node&node=4663312&i=18"
target="_blank">[hidden email]</a>><br>
Content-Type: text/plain; charset="iso-8859-1"<br>
<br>
Caro Andre<br>
<br>
Segue abaixo a resposta. Acho porem que existem alguns fóruns mais apropriados
para perguntas desse tipo. Procure fóruns sobre matemática, ou calculo
especificamente. Acho que essa lista e mais adequada para questões envolvendo
programação estatística.<br>
<br>
Use integração por partes (no exemplo q estou enviando, não inclui a constante
na integral indefinida pq vc tem uma integral definida. Portanto, apenas inclua
os limites de integração no exemplo).<br>
<br>
<br>
<br>
<br>
Abracos<br>
<br>
<br>
-- <br>
Diogo Ferrari<br>
PhD Student<br>
University of Michigan, Ann Arbor<br>
Department of Political Science<br>
E-mail: <a href="http://user/SendEmail.jtp?type=node&node=4663312&i=19"
target="_blank">[hidden email]</a> <mailto:<a
href="http://user/SendEmail.jtp?type=node&node=4663312&i=20"
target="_blank">[hidden email]</a>><br>
<br>
Open Source! Use R! Use Linux!<br>
<br>
"A vida é a arte de tirar conclusões suficientes de dados
insuficientes"<br>
<br>
<br>
<o:p></o:p></span></p>
<div>
<p class=MsoNormal style='background:white'><span style='font-family:"Helvetica","sans-serif";
color:black'><br>
> On Oct 19, 2014, at 3:23 PM, <a
href="http://user/SendEmail.jtp?type=node&node=4663312&i=21"
target="_blank">[hidden email]</a> wrote:<br>
> <br>
> Aonde estou errando nessa integral, o caminho não seria esse?<br>
> <br>
> Att.<br>
> André<br>
> <Integral.jpg>_______________________________________________<br>
> R-br mailing list<br>
> <a href="http://user/SendEmail.jtp?type=node&node=4663312&i=22"
target="_blank">[hidden email]</a><br>
> <a href="https://listas.inf.ufpr.br/cgi-bin/mailman/listinfo/r-br"
target="_blank">https://listas.inf.ufpr.br/cgi-bin/mailman/listinfo/r-br</a><br>
> Leia o guia de postagem (<a href="http://www.leg.ufpr.br/r-br-guia"
target="_blank">http://www.leg.ufpr.br/r-br-guia</a>) e forneça código mínimo
reproduzível.<o:p></o:p></span></p>
</div>
<p class=MsoNormal style='margin-bottom:12.0pt;background:white'><span
style='font-family:"Helvetica","sans-serif";color:black'><br>
-------------- Próxima Parte ----------<br>
Um anexo em HTML foi limpo...<br>
URL: <<a
href="http://listas.inf.ufpr.br/pipermail/r-br/attachments/20141019/f9144d27/attachment.html"
target="_blank">http://listas.inf.ufpr.br/pipermail/r-br/attachments/20141019/f9144d27/attachment.html</a>><br>
-------------- Próxima Parte ----------<br>
Um anexo não-texto foi limpo...<br>
Nome: latexit-drag.pdf<br>
Tipo: application/pdf<br>
Tamanho: 59430 bytes<br>
Descrição: não disponível<br>
URL: <<a
href="http://listas.inf.ufpr.br/pipermail/r-br/attachments/20141019/f9144d27/attachment.pdf"
target="_blank">http://listas.inf.ufpr.br/pipermail/r-br/attachments/20141019/f9144d27/attachment.pdf</a>><br>
-------------- Próxima Parte ----------<br>
Um anexo em HTML foi limpo...<br>
URL: <<a
href="http://listas.inf.ufpr.br/pipermail/r-br/attachments/20141019/f9144d27/attachment-0001.html"
target="_blank">http://listas.inf.ufpr.br/pipermail/r-br/attachments/20141019/f9144d27/attachment-0001.html</a>><br>
<br>
------------------------------<br>
<br>
Subject: Legenda do Digest<br>
<br>
_______________________________________________<br>
R-br mailing list<br>
<a href="http://user/SendEmail.jtp?type=node&node=4663312&i=23"
target="_blank">[hidden email]</a><br>
<a href="https://listas.inf.ufpr.br/cgi-bin/mailman/listinfo/r-br"
target="_blank">https://listas.inf.ufpr.br/cgi-bin/mailman/listinfo/r-br</a><br>
<br>
<br>
------------------------------<br>
<br>
Fim da Digest R-br, volume 46, assunto 20<br>
*****************************************<o:p></o:p></span></p>
</div>
</div>
</div>
</div>
</div>
<p class=MsoNormal style='margin-bottom:12.0pt'><br>
_______________________________________________ <br>
R-br mailing list <br>
<a href="http://user/SendEmail.jtp?type=node&node=4663312&i=24"
target="_blank">[hidden email]</a> <br>
<a href="https://listas.inf.ufpr.br/cgi-bin/mailman/listinfo/r-br"
target="_blank">https://listas.inf.ufpr.br/cgi-bin/mailman/listinfo/r-br</a><br>
Leia o guia de postagem (<a href="http://www.leg.ufpr.br/r-br-guia"
target="_blank">http://www.leg.ufpr.br/r-br-guia</a>) e forneça código mínimo
reproduzível. <o:p></o:p></p>
<div class=MsoNormal align=center style='text-align:center'>
<hr size=1 width="100%" noshade style='color:#CCCCCC' align=center>
</div>
<div>
<div>
<p class=MsoNormal><b><span style='font-size:9.0pt;font-family:"Tahoma","sans-serif";
color:#444444'>If you reply to this email, your message will be added to the
discussion below:<o:p></o:p></span></b></p>
</div>
<p class=MsoNormal><span style='font-size:9.0pt;font-family:"Tahoma","sans-serif";
color:#444444'><a
href="http://r-br.2285057.n4.nabble.com/R-br-skater-e-deldir-tp4663303p4663312.html"
target="_blank">http://r-br.2285057.n4.nabble.com/R-br-skater-e-deldir-tp4663303p4663312.html</a>
<o:p></o:p></span></p>
</div>
<div>
<div>
<div style='margin-top:4.8pt'>
<p class=MsoNormal style='line-height:18.0pt'><span style='font-size:8.5pt;
font-family:"Tahoma","sans-serif";color:#666666'>To unsubscribe from R-br, <a
href="http://r-br.2285057.n4.nabble.com/template/NamlServlet.jtp?macro=unsubscribe_by_code&node=3357982&code=aGVsaW9nYWxsb3JvY2hhQGdtYWlsLmNvbXwzMzU3OTgyfC0xMzQ3NTkwMDY4"
target="_blank">click here</a>.<br>
<a
href="http://r-br.2285057.n4.nabble.com/template/NamlServlet.jtp?macro=macro_viewer&id=instant_html%21nabble%3Aemail.naml&base=nabble.naml.namespaces.BasicNamespace-nabble.view.web.template.NabbleNamespace-nabble.view.web.template.NodeNamespace&breadcrumbs=notify_subscribers%21nabble%3Aemail.naml-instant_emails%21nabble%3Aemail.naml-send_instant_email%21nabble%3Aemail.naml"
target="_blank"><span style='font-size:7.0pt;font-family:"Times New Roman","serif"'>NAML</span></a>
<o:p></o:p></span></p>
</div>
</div>
</div>
</div>
<p class=MsoNormal><br>
<br clear=all>
<o:p></o:p></p>
<div>
<p class=MsoNormal><o:p> </o:p></p>
</div>
<p class=MsoNormal>-- <br>
Hélio Gallo Rocha<br>
IFSULDEMINAS - Câmpus Muzambinho<o:p></o:p></p>
</div>
</div>
<br /><br />
<hr style='border:none; color:#909090; background-color:#B0B0B0; height: 1px; width: 99%;' />
<table style='border-collapse:collapse;border:none;'>
<tr>
<td style='border:none;padding:0px 15px 0px 8px'>
<a href="http://www.avast.com/">
<img border=0 src="http://static.avast.com/emails/avast-mail-stamp.png" />
</a>
</td>
<td>
<p style='color:#3d4d5a; font-family:"Calibri","Verdana","Arial","Helvetica"; font-size:12pt;'>
Este email está limpo de vírus e malwares porque a proteção do <a href="http://www.avast.com/">avast! Antivírus</a> está ativa.
</p>
</td>
</tr>
</table>
<br />
</body>
</html>