<html><body><div style="color:#000; background-color:#fff; font-family:lucida console, sans-serif;font-size:16px"><div id="yui_3_16_0_1_1414067921831_2633" dir="ltr">tabelas<-function(x){</div><div id="yui_3_16_0_1_1414067921831_2634" dir="ltr"> Qtde<-table(x) #absoluta<br></div><div id="yui_3_16_0_1_1414067921831_2640" dir="ltr"> Perc<-100*prop.table(table(x)) #relativa<br></div><div id="yui_3_16_0_1_1414067921831_2646" dir="ltr"> Tab<-cbind(Qtde,Perc)</div><div id="yui_3_16_0_1_1414067921831_2642" dir="ltr"> Total<-colSums(Tab)</div><div id="yui_3_16_0_1_1414067921831_2643" dir="ltr"> rbind(Tab,Total)<br></div><div id="yui_3_16_0_1_1414067921831_2635">}</div><div id="yui_3_16_0_1_1414067921831_2647"><br></div><div id="yui_3_16_0_1_1414067921831_2648" dir="ltr">options(digits=3)<br></div><div dir="ltr" id="yui_3_16_0_1_1414067921831_2636"><span id="yui_3_16_0_1_1414067921831_2666">apply(bd,2,tabelas)</span></div><div id="yui_3_16_0_1_1414067921831_2641"><div id="yui_3_16_0_1_1414067921831_2649"> </div><div id="yui_3_16_0_1_1414067921831_2650" dir="ltr">Espero ter ajudado</div><div id="yui_3_16_0_1_1414067921831_2667" dir="ltr">[ ]'s.<br></div></div><div id="yui_3_16_0_1_1414067921831_2645"><div id="yui_3_16_0_1_1414067921831_2644">Edson Lira<br>Estatístico<br>Manaus-Amazonas</div></div> <div class="qtdSeparateBR"><br><br></div><div style="display: block;" class="yahoo_quoted"> <div style="font-family: lucida console, sans-serif; font-size: 16px;"> <div style="font-family: HelveticaNeue, Helvetica Neue, Helvetica, Arial, Lucida Grande, sans-serif; font-size: 16px;"> <div dir="ltr"> <font face="Arial" size="2"> Em Quarta-feira, 22 de Outubro de 2014 21:55, "lutipilotto@yahoo.com.br" <lutipilotto@yahoo.com.br> escreveu:<br> </font> </div> <br><br> <div class="y_msg_container"><div id="yiv2873321972">
<style><!--
#yiv2873321972 p.yiv2873321972MsoListParagraph, #yiv2873321972 li.yiv2873321972MsoListParagraph, #yiv2873321972 div.yiv2873321972MsoListParagraph {
margin-top:0in;margin-right:0in;margin-bottom:0in;margin-left:.5in;margin-bottom:.0001pt;}
#yiv2873321972 p.yiv2873321972MsoNormal, #yiv2873321972 li.yiv2873321972MsoNormal, #yiv2873321972 div.yiv2873321972MsoNormal {
margin:0in;margin-bottom:.0001pt;}
#yiv2873321972 p.yiv2873321972MsoListParagraphCxSpFirst, #yiv2873321972 li.yiv2873321972MsoListParagraphCxSpFirst, #yiv2873321972 div.yiv2873321972MsoListParagraphCxSpFirst,
#yiv2873321972 p.yiv2873321972MsoListParagraphCxSpMiddle, #yiv2873321972 li.yiv2873321972MsoListParagraphCxSpMiddle, #yiv2873321972 div.yiv2873321972MsoListParagraphCxSpMiddle,
#yiv2873321972 p.yiv2873321972MsoListParagraphCxSpLast, #yiv2873321972 li.yiv2873321972MsoListParagraphCxSpLast, #yiv2873321972 div.yiv2873321972MsoListParagraphCxSpLast {
margin-top:0in;margin-right:0in;margin-bottom:0in;margin-left:.5in;margin-bottom:.0001pt;line-height:115%;}
--></style>
<div dir="ltr">
<div dir="ltr" style="font-family:'Calibri', 'Segoe UI', 'Meiryo', 'Microsoft YaHei UI', 'Microsoft JhengHei UI', 'Malgun Gothic', 'sans-serif';font-size:12pt;"><div>Olá pessoal, </div><div><br></div><div>tem algum comando para fazer uma tabela única direto no R com frequencia relativa e absoluta? E tb valores de chi² e p.</div><div>Estou usando os comandos abaixo, mas o resultado aparece em tabelas individuais.</div><div><br></div><div>table(q11,q13)<br>rowPercents(table(q11,q13))<br>f <- chiSquare(q13 ~ q11)<br>f</div><div><br></div><div><br></div><div>Atenciosamente,</div><div>Luciane Pilotto<br></div><div><div><br></div><div>Enviado do Email do Windows</div><div><br></div></div><div style="padding-top:5px;border-top-color:rgb(229, 229, 229);border-top-width:1px;border-top-style:solid;"><div><font style="line-height:15pt;letter-spacing:0.02em;font-family:"Calibri", "Segoe UI", "Meiryo", "Microsoft YaHei UI", "Microsoft JhengHei UI", "Malgun Gothic", "sans-serif";font-size:12pt;" face=" 'Calibri', 'Segoe UI', 'Meiryo', 'Microsoft YaHei UI', 'Microsoft JhengHei UI', 'Malgun Gothic', 'sans-serif'"><b>De:</b> <a rel="nofollow" ymailto="mailto:heliogallorocha@gmail.com" target="_blank" href="mailto:heliogallorocha@gmail.com">Hélio Gallo Rocha</a><br><b>Enviado:</b> quarta-feira, 22 de outubro de 2014 09:07<br><b>Para:</b> <a rel="nofollow" ymailto="mailto:r-br@listas.c3sl.ufpr.br" target="_blank" href="mailto:r-br@listas.c3sl.ufpr.br">r-br</a></font></div></div><div><br></div><div dir=""><div dir="ltr"><span style="font-family:arial, sans-serif;font-size:13px;">Mauro, bom dia.</span><div style="font-family:arial, sans-serif;font-size:13px;"><br></div><div style="font-family:arial, sans-serif;font-size:13px;"><br></div><div style="font-family:arial, sans-serif;font-size:13px;"><font face="arial, sans-serif">Não sei qual seu objetivo no uso desta função, assim vou te passar o histórico e se quiser dando idéias, será bem vindo</font></div><div style="font-family:arial, sans-serif;font-size:13px;"><font face="arial, sans-serif">Estou estudando geoestatística e é interessante saber que regiões tem seus atributos "parecidos".</font></div><div style="font-family:arial, sans-serif;font-size:13px;"><font face="arial, sans-serif">A idéia inicial era utilizar a função skater do pacote spdep.</font></div><div style="font-family:arial, sans-serif;font-size:13px;"><br></div><div style="font-family:arial, sans-serif;font-size:13px;">Como tenho pontos teria de criar poligonos, que foi realizado com a função deldir, e listar os poligonos.</div><div style="font-family:arial, sans-serif;font-size:13px;"><br></div><div style="font-family:arial, sans-serif;font-size:13px;">A listagem era um problemão, pois teria de crira poligono por poligono, como no CRM inicial.</div><div style="font-family:arial, sans-serif;font-size:13px;">Problema resolvido com a preciosa ajuda do Rafael. que sugeriu usar a função poly2nb do pacote sddep</div><div style="font-family:arial, sans-serif;font-size:13px;"><br></div><div style="font-family:arial, sans-serif;font-size:13px;">Com a função deldir apenas gera poligonos assim foi necessário inserir dados aos mesmo e torná-los um SpatialPolygonsDataFrame<br></div><div style="font-family:arial, sans-serif;font-size:13px;"><br></div><div style="font-family:arial, sans-serif;font-size:13px;">Dai pra frente o código está em estudo, veja:</div><div style="font-family:arial, sans-serif;font-size:13px;"><div>require(deldir) ;require(spdep)</div><div>## 1. Coordenadas</div><div>n <- 40 </div><div>set.seed(47)</div><div>x <- runif(n)</div><div>y <- runif(n)</div><div>plot(x,y)</div><div>## 2. Dados</div><div> set.seed(1389)</div><div>dados <- data.frame(rnorm(n,10,sd=5), rnorm(n,15,sd=5),rnorm(n,20,sd=5))</div><div>colnames(dados)<- paste("var",1:3,sep="")</div><div>row.names(dados) <- paste("reg", 1:n, sep = "")</div><div>dados</div><div>class(dados)</div><div><br></div><div>## 3. gerando coordenadas dos poligonos com função deldir</div><div>d <- deldir(x,y)</div><div><br></div><div>ttt <- triang.list(d)</div><div>plot(ttt)</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><br></div><div>## 4. Gerando poligonos</div><div>### Rafael Tieppo---- G R A N D E A J U D A ! ! ! !</div><span class="yiv2873321972im"><div><br></div><div><br></div><div>FUN_VOR_MAT <- function (A,TT) #TT é o arquivo, N o número do POL</div><div> {</div><div> AA <- 1</div><div> BB <- 2</div><div> NROW <- length (A[[TT]]$x) + 1 #add primeiro ponto</div><div><br></div><div><br></div><div> VORONOI_MATRIX <- matrix(0,NROW,2)</div><div> VORONOI_MATRIX[1:NROW,AA] <- A[[TT]]$x[1:NROW]</div><div> VORONOI_MATRIX[1:NROW,BB] <- A[[TT]]$y[1:NROW]</div><div> VORONOI_MATRIX[NROW,AA] <- A[[TT]]$x[1] #+ 1 add primeiro ponto</div><div> VORONOI_MATRIX[NROW,BB] <- A[[TT]]$y[1] #+ 1 add primeiro ponto</div><div><br></div><div> if(TT == NROW){</div><div> print("17/10/2014, [hidden email] ")}</div><div> return(VORONOI_MATRIX)</div><div> }</div><div><br></div></span><div>## Agora vc vai usar a funcao:</div><div>AREAS<- lapply(1:length(sss), function (x) ( FUN_VOR_MAT(sss,x)) )</div><div> summary(AREAS)</div><div>## 5. Formando Polygons</div><span class="yiv2873321972im"><div>POLS<- lapply(1:length(AREAS), function(x) Polygons(list(Polygon(AREAS[[x]])),</div><div> ID = paste("reg", x, sep = "")))</div></span><div> summary(POLS)</div><div> class(POLS)</div><div> </div><div><br></div><div> SPol <- SpatialPolygons(POLS) </div><div> class(SPol) </div><div> plot(SPol)</div><div> bbox(SPol)</div><div> </div><div>## 6. Inserindo dados aos poligonos </div><div> SPolDF <- SpatialPolygonsDataFrame(SPol, dados) </div><div>plot(SPolDF)</div><div> </div><div> </div><div>## 7. Código para visualizar áreas "parecidas"</div><div><br></div><div>## em estudo</div><div>(coordenadas=cbind(x,y))</div><div>class(coordenadas)</div><div><br></div><div><br></div><div>## </div><div>rn <- sapply(slot(SPolDF, "polygons"), function(x) slot(x, "ID"))</div><div><br></div><div>knn1 <- knearneigh(coordenadas, 1)</div><div><br></div><div>knn2 <- knearneigh(coordenadas, 2)</div><div><br></div><div>nb1 <- knn2nb(knn1, row.names=rn)</div><div><br></div><div>nb2 <- knn2nb(knn2, row.names=rn)</div><div><br></div><div>##1</div><div>diffs <- diffnb(nb2, nb1)</div><div>plot(SPolDF, border="grey")</div><div>plot(nb1, coordenadas, add=TRUE)</div><div>plot(diffs, coordenadas, add=TRUE, col="red")</div><div>title(main=paste("Differences (red) in Columbus GAL weights (black)", "and polygon generated queen weights", sep="\n"))</div><div> </div><div> </div><div>##2 </div><div>xxx <- poly2nb(SPolDF, queen=FALSE)</div><div>dxxx <- diffnb(xxx, nb1)</div><div>plot(SPolDF, border = "grey")</div><div>plot(nb1, coordenadas, add = TRUE)</div><div>plot(dxxx, coordenadas, add = TRUE, col = "red")</div><div>title(main=paste("Differences (red) in Columbus GAL weights (black)",</div><div> "and polygon generated rook weightsvvv", sep="\n"))</div><div><br></div><div>## 3</div><div>cards <- card(nb2)</div><div>maxconts <- which(cards == max(cards))</div><div>if(length(maxconts) > 1) maxconts <- maxconts[1]</div><div>fg <- rep("grey", length(cards))</div><div>fg[maxconts] <- "red"</div><div>fg[nb2[[maxconts]]] <- "green"</div><div>plot(SPolDF, col=fg)</div><div>title(main="Region with largest number of contiguities")</div><div><br></div><div><br></div><div>plot(SPolDF, border="grey")</div><div>plot(nb1, coordenadas, add=TRUE)</div><div>plot(diffs, coordenadas, add=TRUE, col="red", lty=2)</div></div><div style="font-family:arial, sans-serif;font-size:13px;"><br></div><div style="font-family:arial, sans-serif;font-size:13px;"><br></div><div style="font-family:arial, sans-serif;font-size:13px;">Abraço</div><div style="font-family:arial, sans-serif;font-size:13px;"><br></div><div style="font-family:arial, sans-serif;font-size:13px;">Hélio</div></div><div class="yiv2873321972gmail_extra"><br><div class="yiv2873321972gmail_quote">Em 21 de outubro de 2014 23:41, Mauro Sznelwar [via R-br] <span dir="ltr"><<a rel="nofollow" ymailto="mailto:ml-node+s2285057n4663338h46@n4.nabble.com" target="_blank" href="mailto:ml-node+s2285057n4663338h46@n4.nabble.com">ml-node+s2285057n4663338h46@n4.nabble.com</a>></span> escreveu:<br><blockquote class="yiv2873321972gmail_quote" style="margin:0px 0px 0px 0.8ex;padding-left:1ex;border-left-color:rgb(204, 204, 204);border-left-width:1px;border-left-style:solid;">
<div>
<div class="yiv2873321972MsoNormal"><span style="color:rgb(31, 73, 125);font-family:"Arial", "sans-serif";">Tentei
rodar vosso script, mas a partir daí não foi mais, qual o motivo?<u></u><u></u></span></div>
<div class="yiv2873321972MsoNormal"><span style="color:rgb(31, 73, 125);" lang="EN-US">> plot(sss)<u></u><u></u></span></div>
<div class="yiv2873321972MsoNormal"><span style="color:rgb(31, 73, 125);" lang="EN-US">>
polygon(p1,border="green",lwd=3) <u></u><u></u></span></div>
<div class="yiv2873321972MsoNormal"><span style="color:rgb(31, 73, 125);" lang="EN-US">Error in xy.coords(x,
y) : <u></u><u></u></span></div>
<div class="yiv2873321972MsoNormal"><span style="color:rgb(31, 73, 125);" lang="EN-US"> 'x' is a list, but
does not have components 'x' and 'y'</span><span lang="EN-US"><u></u><u></u></span></div><div><div class="yiv2873321972h5">
<div class="yiv2873321972MsoNormal"><span style="color:rgb(31, 73, 125);font-family:"Calibri", "sans-serif";font-size:11pt;" lang="EN-US"><u></u> <u></u></span></div>
<div class="yiv2873321972MsoNormal"><u></u> <u></u></div>
<div>
<div class="yiv2873321972MsoNormal">Caros Elias e Rafael.<u></u><u></u></div>
<div>
<div class="yiv2873321972MsoNormal"><u></u> <u></u></div>
</div>
<div>
<div class="yiv2873321972MsoNormal">Rafael, obrigado pelo código, vou testar, mas depois de
conseguir separar os polígonos.<u></u><u></u></div>
</div>
<div>
<div class="yiv2873321972MsoNormal">Na realidade é essa a minha dificuldade.<u></u><u></u></div>
</div>
<div>
<div class="yiv2873321972MsoNormal"><u></u> <u></u></div>
</div>
<div>
<div class="yiv2873321972MsoNormal">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:<u></u><u></u></div>
</div>
<div>
<div>
<div class="yiv2873321972MsoNormal"><u></u> <u></u></div>
</div>
<div>
<div class="yiv2873321972MsoNormal"><u></u> <u></u></div>
</div>
<div>
<div class="yiv2873321972MsoNormal">## objeto que possui as coordenadas geradas na função deldir
é o objeto sss<u></u><u></u></div>
</div>
<div>
<div class="yiv2873321972MsoNormal"><u></u> <u></u></div>
</div>
<div>
<div class="yiv2873321972MsoNormal">## coordenadas do poligono 01<u></u><u></u></div>
</div>
<div>
<div class="yiv2873321972MsoNormal">(x1 <- sss[[1]][2])<u></u><u></u></div>
</div>
<div>
<div class="yiv2873321972MsoNormal">(y1 <- sss[[1]][3])<u></u><u></u></div>
</div>
<div>
<div class="yiv2873321972MsoNormal"><u></u> <u></u></div>
</div>
<div>
<div class="yiv2873321972MsoNormal">## coordenadas do poligono 02<u></u><u></u></div>
</div>
<div>
<div class="yiv2873321972MsoNormal">x2 <- sss[[2]][2]<u></u><u></u></div>
</div>
<div>
<div class="yiv2873321972MsoNormal">y2 <- sss[[2]][3]<u></u><u></u></div>
</div>
<div>
<div class="yiv2873321972MsoNormal">.<u></u><u></u></div>
</div>
<div>
<div class="yiv2873321972MsoNormal">.<u></u><u></u></div>
</div>
<div>
<div class="yiv2873321972MsoNormal">.<u></u><u></u></div>
</div>
<div>
<div class="yiv2873321972MsoNormal">.<u></u><u></u></div>
</div>
<div>
<div class="yiv2873321972MsoNormal">. <u></u><u></u></div>
</div>
<div>
<div class="yiv2873321972MsoNormal">## coordenadas do poligono 20<u></u><u></u></div>
</div>
<div>
<div class="yiv2873321972MsoNormal">x20 <- sss[[20]][2]<u></u><u></u></div>
</div>
<div>
<div class="yiv2873321972MsoNormal">y20 <- sss[[20]][3]<u></u><u></u></div>
</div>
<div>
<div class="yiv2873321972MsoNormal"> <u></u><u></u></div>
</div>
<div>
<div class="yiv2873321972MsoNormal">## Agrupando as coordenadas num só objeto<u></u><u></u></div>
</div>
<div>
<div class="yiv2873321972MsoNormal">(p1 <-c(x1,y1))<u></u><u></u></div>
</div>
<div>
<div class="yiv2873321972MsoNormal"> <u></u><u></u></div>
</div>
<div>
<div class="yiv2873321972MsoNormal">(p2 <-c(x2,y2))<u></u><u></u></div>
</div>
<div>
<div class="yiv2873321972MsoNormal"><u></u> <u></u></div>
</div>
<div>
<div class="yiv2873321972MsoNormal">(p20 <-c(x20,y20))<u></u><u></u></div>
</div>
</div>
<div>
<div class="yiv2873321972MsoNormal"><u></u> <u></u></div>
</div>
<div>
<div class="yiv2873321972MsoNormal">## visualizando os poligonos<u></u><u></u></div>
</div>
<div>
<div class="yiv2873321972MsoNormal">plot(sss)<u></u><u></u></div>
</div>
<div>
<div class="yiv2873321972MsoNormal">polygon(p1,border="green",lwd=3) <u></u><u></u></div>
</div>
<div>
<div class="yiv2873321972MsoNormal">polygon(p2,border="red",lwd=3) <u></u><u></u></div>
</div>
<div>
<div class="yiv2873321972MsoNormal">polygon(p20,border="blue",lwd=3) <u></u><u></u></div>
</div>
<div>
<div class="yiv2873321972MsoNormal"><u></u> <u></u></div>
</div>
<div>
<div class="yiv2873321972MsoNormal">## Os passos seguintes diferem do seu<u></u><u></u></div>
</div>
<div>
<div class="yiv2873321972MsoNormal"><u></u> <u></u></div>
</div>
<div>
<div class="yiv2873321972MsoNormal">## 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<u></u><u></u></div>
</div>
<div>
<div class="yiv2873321972MsoNormal"><u></u> <u></u></div>
</div>
<div>
<div>
<div class="yiv2873321972MsoNormal">(x11 <- c(p1$x, p1$x[1]))<u></u><u></u></div>
</div>
<div>
<div class="yiv2873321972MsoNormal">(y11 <- c(p1$y, p1$y[1]))<u></u><u></u></div>
</div>
<div>
<div class="yiv2873321972MsoNormal"><u></u> <u></u></div>
</div>
<div>
<div class="yiv2873321972MsoNormal"><u></u> <u></u></div>
</div>
<div>
<div class="yiv2873321972MsoNormal">(p1 <- cbind(x11,y11))<u></u><u></u></div>
</div>
</div>
<div>
<div class="yiv2873321972MsoNormal"><u></u> <u></u></div>
</div>
<div>
<div class="yiv2873321972MsoNormal">## transformando em SpatialPolygons<u></u><u></u></div>
</div>
<div>
<div>
<div class="yiv2873321972MsoNormal">### Passo 1<u></u><u></u></div>
</div>
<div>
<div class="yiv2873321972MsoNormal">linep1=Polygon(p1);class(linep1) #Polygon<u></u><u></u></div>
</div>
<div>
<div class="yiv2873321972MsoNormal">linep1<u></u><u></u></div>
</div>
<div>
<div class="yiv2873321972MsoNormal"><u></u> <u></u></div>
</div>
<div>
<div class="yiv2873321972MsoNormal"><u></u> <u></u></div>
</div>
<div>
<div class="yiv2873321972MsoNormal">## Passo 2<u></u><u></u></div>
</div>
<div>
<div class="yiv2873321972MsoNormal">linep1a=Polygons(list(linep1),ID="a");class(linep1a)
# Polygons<u></u><u></u></div>
</div>
<div>
<div class="yiv2873321972MsoNormal">linep1a<u></u><u></u></div>
</div>
<div>
<div class="yiv2873321972MsoNormal"><u></u> <u></u></div>
</div>
<div>
<div class="yiv2873321972MsoNormal">## Passo 3<u></u><u></u></div>
</div>
<div>
<div class="yiv2873321972MsoNormal">linesp=SpatialPolygons(list(linep1a));class(linesp)
#SpatialPolygons<u></u><u></u></div>
</div>
<div>
<div class="yiv2873321972MsoNormal">linesp<u></u><u></u></div>
</div>
<div>
<div class="yiv2873321972MsoNormal"><u></u> <u></u></div>
</div>
<div>
<div class="yiv2873321972MsoNormal">## Passo 4<u></u><u></u></div>
</div>
<div>
<div class="yiv2873321972MsoNormal">proj4string(linesp) <- CRS("+proj=utm + zone=23s
+datum=WGS84")<u></u><u></u></div>
</div>
<div>
<div class="yiv2873321972MsoNormal">summary(linesp)<u></u><u></u></div>
</div>
<div>
<div class="yiv2873321972MsoNormal">plot(linesp)<u></u><u></u></div>
</div>
</div>
<div>
<div class="yiv2873321972MsoNormal"><u></u> <u></u></div>
</div>
<div>
<div class="yiv2873321972MsoNormal">Se puder dar uma mão, agradeço desde já..<u></u><u></u></div>
</div>
<div>
<div class="yiv2873321972MsoNormal"><u></u> <u></u></div>
</div>
<div>
<div class="yiv2873321972MsoNormal">Abraço<u></u><u></u></div>
</div>
<div>
<div class="yiv2873321972MsoNormal"><u></u> <u></u></div>
</div>
<div>
<div class="yiv2873321972MsoNormal">Hélio<u></u><u></u></div>
</div>
</div>
</div></div><div>
<div class="yiv2873321972MsoNormal"><u></u> <u></u></div>
<div>
<div class="yiv2873321972MsoNormal">Em 20 de outubro de 2014 13:22, Rafael Tieppo [via R-br]
<<a rel="nofollow" target="_blank" href="http://user/SendEmail.jtp?type=node&node=4663338&i=0">[hidden email]</a>>
escreveu:<u></u><u></u></div><div><div class="yiv2873321972h5">
<div>
<div>
<div class="yiv2873321972MsoNormal" style="background:white;"><span style="color:black;font-family:"Lucida Console";font-size:10pt;">Hélio,<u></u><u></u></span></div>
</div>
<div>
<div class="yiv2873321972MsoNormal"><span style="color:black;font-family:"Lucida Console";font-size:10pt;"><u></u> <u></u></span></div>
</div>
<div>
<div class="yiv2873321972MsoNormal"><span style="color:black;font-family:"Lucida Console";font-size:10pt;">Após dividir sua área em polígonos, vc terá um conjunto de
coordenadas, onde cada conjunto será um polígono.<u></u><u></u></span></div>
</div>
<div>
<div class="yiv2873321972MsoNormal"><span style="color:black;font-family:"Lucida Console";font-size:10pt;">Com esse objeto pronto em forma de lista:<u></u><u></u></span></div>
</div>
<div>
<div class="yiv2873321972MsoNormal"><span style="color:black;font-family:"Lucida Console";font-size:10pt;"><u></u> <u></u></span></div>
</div>
<div>
<div class="yiv2873321972MsoNormal"><span style="color:black;font-family:"Lucida Console";font-size:10pt;">Passo 1: Formar "Polygons"<u></u><u></u></span></div>
</div>
<div>
<div class="yiv2873321972MsoNormal"><span style="color:black;font-family:"Lucida Console";font-size:10pt;">POLS <- lapply(1:length(AREAS), function(x)
Polygons(list(Polygon(AREAS[[x]])),<u></u><u></u></span></div>
</div>
<div>
<div class="yiv2873321972MsoNormal"><span style="color:black;font-family:"Lucida Console";font-size:10pt;"> ID = paste("reg", x, sep =
"")))<u></u><u></u></span></div>
</div>
<div>
<div class="yiv2873321972MsoNormal"><span style="color:black;font-family:"Lucida Console";font-size:10pt;">Passo 2:Converter em "SpatialPolygons"<u></u><u></u></span></div>
</div>
<div>
<div class="yiv2873321972MsoNormal"><span style="color:black;font-family:"Lucida Console";font-size:10pt;">POLS <- as.SpatialPolygons.PolygonsList(POLS,
proj4string=CRS(as.character(NA)))<u></u><u></u></span></div>
</div>
<div>
<div class="yiv2873321972MsoNormal"><span style="color:black;font-family:"Lucida Console";font-size:10pt;"><u></u> <u></u></span></div>
</div>
<div>
<div class="yiv2873321972MsoNormal"><span style="color:black;font-family:"Lucida Console";font-size:10pt;">Agora vc já pode usar a função poly2nb()<u></u><u></u></span></div>
</div>
<div>
<div class="yiv2873321972MsoNormal"><span style="color:black;font-family:"Lucida Console";font-size:10pt;"> poly2nb(POLS)<u></u><u></u></span></div>
</div>
<div>
<div class="yiv2873321972MsoNormal"><span style="color:black;font-family:"Lucida Console";font-size:10pt;"><u></u> <u></u></span></div>
</div>
<div>
<div class="yiv2873321972MsoNormal"><span style="color:black;font-family:"Lucida Console";font-size:10pt;">Tem um tutorial bem detalhado do professor:<u></u><u></u></span></div>
</div>
<div>
<div class="yiv2873321972MsoNormal"><span style="color:black;font-family:"Lucida Console";font-size:10pt;"><a rel="nofollow" target="_blank" href="http://www.leg.ufpr.br/~paulojus/embrapa/Rembrapa/Rembrapase31.html">Classes para dados espaciais: o pacote sp</a><u></u><u></u></span></div>
</div>
<div style="margin-top:3.75pt;margin-bottom:3.75pt;">
<table style="width:337.5pt;border-collapse:collapse;" width="450" border="0" cellpadding="0" cellspacing="0">
<tbody><tr style="height:0.75pt;">
<td style="background:rgb(229, 229, 229);padding:0cm;height:0.75pt;" colspan="8">
<div>
<div class="yiv2873321972MsoNormal" style="background:rgb(229, 229, 229);"><span style="font-size:1pt;"> <u></u><u></u></span></div>
</div>
</td>
</tr>
<tr style="height:4.5pt;">
<td style="background:rgb(229, 229, 229);padding:0cm;width:0.75pt;height:4.5pt;" rowspan="5" width="1">
<div>
<div class="yiv2873321972MsoNormal" style="background:rgb(229, 229, 229);"><span style="font-size:1pt;"> <u></u><u></u></span></div>
</div>
</td>
<td style="background:black;padding:0cm;width:126pt;height:4.5pt;" rowspan="5" width="168">
<div class="yiv2873321972MsoNormal" style="text-align:center;" align="center"><a rel="nofollow" target="_blank" href="http://www.leg.ufpr.br/~paulojus/embrapa/Rembrapa/Rembrapase31.html"><span style="text-decoration:none;"><img alt="image" src="http://www.leg.ufpr.br/~paulojus/embrapa/Rembrapa/Rembrapa202x.png" height="168" width="168" border="0"></span></a><u></u><u></u></div>
</td>
<td style="background:rgb(229, 229, 229);padding:0cm;width:0.75pt;height:4.5pt;" rowspan="5" width="1">
<div>
<div class="yiv2873321972MsoNormal" style="background:rgb(229, 229, 229);"><span style="font-size:1pt;"> <u></u><u></u></span></div>
</div>
</td>
<td style="background:white;padding:0cm;width:10.5pt;height:4.5pt;" rowspan="5" width="14">
<div>
<div class="yiv2873321972MsoNormal" style="background:white;"><span style="font-size:14pt;"> <u></u><u></u></span></div>
</div>
</td>
<td style="background:white;padding:0cm;height:4.5pt;" colspan="2">
<div>
<div class="yiv2873321972MsoNormal" style="background:white;"><span style="font-size:6pt;"> <u></u><u></u></span></div>
</div>
</td>
<td style="background:white;padding:0cm;width:15pt;height:4.5pt;" rowspan="5" width="20">
<div>
<div class="yiv2873321972MsoNormal" style="background:white;"><span style="font-size:20pt;"> <u></u><u></u></span></div>
</div>
</td>
<td style="background:rgb(229, 229, 229);padding:0cm;width:0.75pt;height:4.5pt;" rowspan="5" width="1">
<div>
<div class="yiv2873321972MsoNormal" style="background:rgb(229, 229, 229);"><span style="font-size:1pt;"> <u></u><u></u></span></div>
</div>
</td>
</tr>
<tr>
<td style="padding:0cm;width:100%;" colspan="2" width="100%">
<div>
<div>
<div class="yiv2873321972MsoNormal" style="background:white;line-height:12.4pt;"><span style="font-family:"Georgia", "serif";"><a rel="nofollow" target="_blank" href="http://www.leg.ufpr.br/~paulojus/embrapa/Rembrapa/Rembrapase31.html"><span style="color:black;font-size:13.5pt;">Classes para dados
espaciais: o pacote sp</span></a><u></u><u></u></span></div>
<div>
<div class="yiv2873321972MsoNormal" style="background:white;line-height:15pt;"><span style="color:rgb(153, 153, 153);font-family:"Georgia", "serif";font-size:10pt;">[next] [prev] [prev-tail] [tail] [up] 31 Classes para dados
espaciais: o pacote sp <u></u><u></u></span></div>
</div>
</div>
</div>
</td>
</tr>
<tr style="height:3pt;">
<td style="background:white;padding:0cm;height:3pt;" colspan="2"></td>
</tr>
<tr>
<td style="padding:0cm;">
<div>
<div class="yiv2873321972MsoNormal"><span style="font-family:"Arial", "sans-serif";font-size:1pt;"><a rel="nofollow" target="_blank" href="http://www.leg.ufpr.br/~paulojus/embrapa/Rembrapa/Rembrapase31.html"><span style="color:rgb(153, 153, 153);font-size:7pt;">View on <b>www.leg.ufpr.br</b></span></a><u></u><u></u></span></div>
</div>
</td>
<td style="padding:0cm;width:75pt;" width="100">
<div class="yiv2873321972MsoNormal" style="text-align:right;line-height:8.25pt;" align="right"><span style="color:rgb(153, 153, 153);font-family:"Arial", "sans-serif";font-size:7pt;">Preview
by Yahoo</span><span style="font-family:"Arial", "sans-serif";font-size:1pt;"><u></u><u></u></span></div>
</td>
</tr>
<tr style="height:6.75pt;">
<td style="background:white;padding:0cm;height:6.75pt;" colspan="2"></td>
</tr>
<tr style="height:0.75pt;">
<td style="background:rgb(229, 229, 229);padding:0cm;height:0.75pt;" colspan="8">
<div>
<div class="yiv2873321972MsoNormal" style="background:rgb(229, 229, 229);"><span style="font-size:1pt;"> <u></u><u></u></span></div>
</div>
</td>
</tr>
<tr height="0">
<td style="border:black;" width="1"></td>
<td style="border:black;" width="168"></td>
<td style="border:black;" width="1"></td>
<td style="border:black;" width="5"></td>
<td style="border:black;" width="139"></td>
<td style="border:black;" width="128"></td>
<td style="border:black;" width="7"></td>
<td style="border:black;" width="1"></td>
</tr>
</tbody></table>
</div>
<div>
<div class="yiv2873321972MsoNormal"><span style="color:black;font-family:"Lucida Console";font-size:10pt;"><u></u> <u></u></span></div>
</div>
<div>
<div class="yiv2873321972MsoNormal" style="background:white;"><span style="color:black;font-family:"Lucida Console";font-size:10pt;"> <u></u><u></u></span></div>
</div>
<div>
<div class="yiv2873321972MsoNormal" style="background:white;margin-bottom:12pt;"><b><span style="color:black;font-family:"Verdana", "sans-serif";font-size:7.5pt;">Rafael
Tieppo</span></b><span style="color:black;font-family:"Lucida Console";font-size:10pt;"><u></u><u></u></span></div>
</div>
<div>
<div class="yiv2873321972MsoNormal" style="background:white;margin-bottom:12pt;"><span style="color:black;font-family:"Lucida Console";font-size:10pt;"><u></u> <u></u></span></div>
</div>
<div>
<div>
<div>
<div>
<div class="yiv2873321972MsoNormal" style="background:white;"><span style="color:black;font-family:"Arial", "sans-serif";">On Sunday, October 19, 2014 7:52 PM, "<a rel="nofollow" target="_blank" href="http://user/SendEmail.jtp?type=node&node=4663312&i=0">[hidden email]</a>" <<a rel="nofollow" target="_blank" href="http://user/SendEmail.jtp?type=node&node=4663312&i=1">[hidden email]</a>> wrote:</span><span style="color:black;font-family:"Helvetica", "sans-serif";"><u></u><u></u></span></div>
</div>
<div class="yiv2873321972MsoNormal" style="background:white;margin-bottom:12pt;"><span style="color:black;font-family:"Helvetica", "sans-serif";"><u></u> <u></u></span></div>
<div>
<div class="yiv2873321972MsoNormal" style="background:white;"><span style="color:black;font-family:"Helvetica", "sans-serif";">Enviar submissões para a lista de discussão R-br para <br>
<a rel="nofollow" target="_blank" href="http://user/SendEmail.jtp?type=node&node=4663312&i=2">[hidden email]</a><br>
<br>
Para se cadastrar ou descadastrar via WWW, visite o endereço<br>
<a rel="nofollow" target="_blank" href="https://listas.inf.ufpr.br/cgi-bin/mailman/listinfo/r-br">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 rel="nofollow" target="_blank" href="http://user/SendEmail.jtp?type=node&node=4663312&i=3">[hidden email]</a><br>
<br>
Você poderá entrar em contato com a pessoa que gerencia a lista pelo<br>
endereço<br>
<a rel="nofollow" target="_blank" href="http://user/SendEmail.jtp?type=node&node=4663312&i=4">[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 rel="nofollow" target="_blank" href="http://user/SendEmail.jtp?type=node&node=4663312&i=5">[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 rel="nofollow" target="_blank" href="http://user/SendEmail.jtp?type=node&node=4663312&i=6">[hidden email]</a><br>
To: "<a rel="nofollow" target="_blank" href="http://user/SendEmail.jtp?type=node&node=4663312&i=7">[hidden email]</a>" <<a rel="nofollow" target="_blank" href="http://user/SendEmail.jtp?type=node&node=4663312&i=8">[hidden email]</a>><br>
Subject: [R-br] Integral<br>
Message-ID: <<a rel="nofollow" target="_blank" href="http://user/SendEmail.jtp?type=node&node=4663312&i=9">[hidden email]</a>><br>
Content-Type: text/plain; charset="iso-8859-1"<br>
<br>
Um anexo em HTML foi limpo...<br>
URL: <<a rel="nofollow" target="_blank" href="http://listas.inf.ufpr.br/pipermail/r-br/attachments/20141019/d7d3470d/attachment-0001.html">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 rel="nofollow" target="_blank" href="http://listas.inf.ufpr.br/pipermail/r-br/attachments/20141019/d7d3470d/attachment-0001.jpg">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 rel="nofollow" target="_blank" href="http://user/SendEmail.jtp?type=node&node=4663312&i=10">[hidden email]</a>><br>
To: r-br <<a rel="nofollow" target="_blank" href="http://user/SendEmail.jtp?type=node&node=4663312&i=11">[hidden email]</a>><br>
Subject: [R-br] skater e deldir<br>
Message-ID:<br>
<CA+<a rel="nofollow" target="_blank" href="http://user/SendEmail.jtp?type=node&node=4663312&i=12">[hidden email]</a>><br>
Content-Type: text/plain; charset="utf-8"<u></u><u></u></span></div>
<div>
<div>
<div class="yiv2873321972MsoNormal" style="background:white;"><span style="color:black;font-family:"Helvetica", "sans-serif";"><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<u></u><u></u></span></div>
</div>
</div>
<div class="yiv2873321972MsoNormal" style="background:white;margin-bottom:12pt;"><span style="color:black;font-family:"Helvetica", "sans-serif";">-------------- Próxima
Parte ----------<br>
Um anexo em HTML foi limpo...<br>
URL: <<a rel="nofollow" target="_blank" href="http://listas.inf.ufpr.br/pipermail/r-br/attachments/20141019/e658abd9/attachment-0001.html">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 rel="nofollow" target="_blank" href="http://user/SendEmail.jtp?type=node&node=4663312&i=13">[hidden email]</a>><br>
To: <a rel="nofollow" target="_blank" href="http://user/SendEmail.jtp?type=node&node=4663312&i=14">[hidden email]</a><br>
Subject: Re: [R-br] Integral<br>
Message-ID:<br>
<CAFU=EkZ_E8hLAgXoUk79T7u6qpi4LLtbqrNAvjCXx+<a rel="nofollow" target="_blank" href="http://user/SendEmail.jtp?type=node&node=4663312&i=15">[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 rel="nofollow" target="_blank" href="http://www.codecogs.com/latex/eqneditor.php">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 rel="nofollow" target="_blank" href="http://listas.inf.ufpr.br/pipermail/r-br/attachments/20141019/587e8e00/attachment-0001.html">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 rel="nofollow" target="_blank" href="http://user/SendEmail.jtp?type=node&node=4663312&i=16">[hidden email]</a>><br>
To: <a rel="nofollow" target="_blank" href="http://user/SendEmail.jtp?type=node&node=4663312&i=17">[hidden email]</a><br>
Subject: Re: [R-br] Integral<br>
Message-ID: <<a rel="nofollow" target="_blank" href="http://user/SendEmail.jtp?type=node&node=4663312&i=18">[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 rel="nofollow" target="_blank" href="http://user/SendEmail.jtp?type=node&node=4663312&i=19">[hidden email]</a> <mailto:<a rel="nofollow" target="_blank" href="http://user/SendEmail.jtp?type=node&node=4663312&i=20">[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>
<u></u><u></u></span></div>
<div>
<div class="yiv2873321972MsoNormal" style="background:white;"><span style="color:black;font-family:"Helvetica", "sans-serif";"><br>
> On Oct 19, 2014, at 3:23 PM, <a rel="nofollow" target="_blank" href="http://user/SendEmail.jtp?type=node&node=4663312&i=21">[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 rel="nofollow" target="_blank" href="http://user/SendEmail.jtp?type=node&node=4663312&i=22">[hidden email]</a><br>
> <a rel="nofollow" target="_blank" href="https://listas.inf.ufpr.br/cgi-bin/mailman/listinfo/r-br">https://listas.inf.ufpr.br/cgi-bin/mailman/listinfo/r-br</a><br>
> Leia o guia de postagem (<a rel="nofollow" target="_blank" href="http://www.leg.ufpr.br/r-br-guia">http://www.leg.ufpr.br/r-br-guia</a>) e forneça código mínimo
reproduzível.<u></u><u></u></span></div>
</div>
<div class="yiv2873321972MsoNormal" style="background:white;margin-bottom:12pt;"><span style="color:black;font-family:"Helvetica", "sans-serif";"><br>
-------------- Próxima Parte ----------<br>
Um anexo em HTML foi limpo...<br>
URL: <<a rel="nofollow" target="_blank" href="http://listas.inf.ufpr.br/pipermail/r-br/attachments/20141019/f9144d27/attachment.html">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 rel="nofollow" target="_blank" href="http://listas.inf.ufpr.br/pipermail/r-br/attachments/20141019/f9144d27/attachment.pdf">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 rel="nofollow" target="_blank" href="http://listas.inf.ufpr.br/pipermail/r-br/attachments/20141019/f9144d27/attachment-0001.html">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 rel="nofollow" target="_blank" href="http://user/SendEmail.jtp?type=node&node=4663312&i=23">[hidden email]</a><br>
<a rel="nofollow" target="_blank" href="https://listas.inf.ufpr.br/cgi-bin/mailman/listinfo/r-br">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>
*****************************************<u></u><u></u></span></div>
</div>
</div>
</div>
</div>
</div>
<div class="yiv2873321972MsoNormal" style="margin-bottom:12pt;"><br>
_______________________________________________ <br>
R-br mailing list <br>
<a rel="nofollow" target="_blank" href="http://user/SendEmail.jtp?type=node&node=4663312&i=24">[hidden email]</a> <br>
<a rel="nofollow" target="_blank" href="https://listas.inf.ufpr.br/cgi-bin/mailman/listinfo/r-br">https://listas.inf.ufpr.br/cgi-bin/mailman/listinfo/r-br</a><br>
Leia o guia de postagem (<a rel="nofollow" target="_blank" href="http://www.leg.ufpr.br/r-br-guia">http://www.leg.ufpr.br/r-br-guia</a>) e forneça código mínimo
reproduzível. <u></u><u></u></div>
<div class="yiv2873321972MsoNormal" style="text-align:center;" align="center">
<hr style="color:rgb(204, 204, 204);" noshade="" size="1" width="99%" align="center">
</div>
<div>
<div>
<div class="yiv2873321972MsoNormal"><b><span style="color:rgb(68, 68, 68);font-family:"Tahoma", "sans-serif";font-size:9pt;">If you reply to this email, your message will be added to the
discussion below:<u></u><u></u></span></b></div>
</div>
<div class="yiv2873321972MsoNormal"><span style="color:rgb(68, 68, 68);font-family:"Tahoma", "sans-serif";font-size:9pt;"><a rel="nofollow" target="_blank" href="http://r-br.2285057.n4.nabble.com/R-br-skater-e-deldir-tp4663303p4663312.html">http://r-br.2285057.n4.nabble.com/R-br-skater-e-deldir-tp4663303p4663312.html</a>
<u></u><u></u></span></div>
</div>
<div>
<div>
<div style="margin-top:4.8pt;">
<div class="yiv2873321972MsoNormal" style="line-height:18pt;"><span style="color:rgb(102, 102, 102);font-family:"Tahoma", "sans-serif";font-size:8.5pt;">To unsubscribe from R-br, <a href="" rel="nofollow">click here</a>.<br>
<a rel="nofollow" target="_blank" href="http://r-br.2285057.n4.nabble.com/template/NamlServlet.jtp?macro=macro_viewer&id=instant_html%21nabble:email.naml&base=nabble.naml.namespaces.BasicNamespace-nabble.view.web.template.NabbleNamespace-nabble.view.web.template.NodeNamespace&breadcrumbs=notify_subscribers%21nabble:email.naml-instant_emails%21nabble:email.naml-send_instant_email%21nabble:email.naml"><span style="font-family:"Times New Roman", "serif";font-size:7pt;">NAML</span></a>
<u></u><u></u></span></div>
</div>
</div>
</div>
</div></div></div><div><div class="yiv2873321972h5">
<div class="yiv2873321972MsoNormal"><br>
<br clear="all">
<u></u><u></u></div>
<div>
<div class="yiv2873321972MsoNormal"><u></u> <u></u></div>
</div>
<div class="yiv2873321972MsoNormal">-- <br>
Hélio Gallo Rocha<br>
IFSULDEMINAS - Câmpus Muzambinho<u></u><u></u></div>
</div></div></div>
</div>
<br><br>
<hr style="border:black;width:99%;color:rgb(144, 144, 144);min-height:1px;background-color:rgb(176, 176, 176);">
<table style="border:black;border-collapse:collapse;">
<tbody><tr>
<td style="padding:0px 15px 0px 8px;border:black;">
<a rel="nofollow" target="_blank" href="http://www.avast.com/">
<img src="http://static.avast.com/emails/avast-mail-stamp.png" border="0">
</a>
</td>
<td>
<div style="color:rgb(61, 77, 90);font-family:"Calibri", "Verdana", "Arial", "Helvetica";font-size:12pt;">
Este email está limpo de vírus e malwares porque a proteção do <a rel="nofollow" target="_blank" href="http://www.avast.com/">avast! Antivírus</a> está ativa.
</div>
</td>
</tr>
</tbody></table><span>
<br>
<br>_______________________________________________
<br>R-br mailing list
<br><a rel="nofollow" target="_blank" href="http://user/SendEmail.jtp?type=node&node=4663338&i=1">[hidden email]</a>
<br><a rel="nofollow" target="_blank" href="https://listas.inf.ufpr.br/cgi-bin/mailman/listinfo/r-br">https://listas.inf.ufpr.br/cgi-bin/mailman/listinfo/r-br</a><br>Leia o guia de postagem (<a rel="nofollow" target="_blank" href="http://www.leg.ufpr.br/r-br-guia">http://www.leg.ufpr.br/r-br-guia</a>) e forneça código mínimo reproduzível.
<br>
<br>
<hr noshade="" size="1" color="#cccccc">
</span><div style="font:12px/normal tahoma, geneva, helvetica, arial, sans-serif;color:rgb(68, 68, 68);font-size-adjust:none;font-stretch:normal;"><span>
<div style="font-weight:bold;">If you reply to this email, your message will be added to the discussion below:</div>
</span><a rel="nofollow" target="_blank" href="http://r-br.2285057.n4.nabble.com/R-br-skater-e-deldir-tp4663303p4663338.html">http://r-br.2285057.n4.nabble.com/R-br-skater-e-deldir-tp4663303p4663338.html</a>
</div><div class="yiv2873321972HOEnZb"><div class="yiv2873321972h5">
<div style="font:11px/1.5em tahoma, geneva, helvetica, arial, sans-serif;color:rgb(102, 102, 102);margin-top:0.4em;font-size-adjust:none;font-stretch:normal;">
To unsubscribe from R-br, <a rel="nofollow" target="_blank" href="http://r-br.2285057.n4.nabble.com/template/NamlServlet.jtp?macro=unsubscribe_by_code&node=3357982&code=aGVsaW9nYWxsb3JvY2hhQGdtYWlsLmNvbXwzMzU3OTgyfC0xMzQ3NTkwMDY4">click here</a>.<br>
<a rel="nofollow" style="font:9px/normal serif;font-size-adjust:none;font-stretch:normal;" target="_blank" href="http://r-br.2285057.n4.nabble.com/template/NamlServlet.jtp?macro=macro_viewer&id=instant_html%21nabble:email.naml&base=nabble.naml.namespaces.BasicNamespace-nabble.view.web.template.NabbleNamespace-nabble.view.web.template.NodeNamespace&breadcrumbs=notify_subscribers%21nabble:email.naml-instant_emails%21nabble:email.naml-send_instant_email%21nabble:email.naml">NAML</a>
</div></div></div></blockquote></div><br><br clear="all"><div><br></div>-- <br>Hélio Gallo Rocha<br>IFSULDEMINAS - Câmpus Muzambinho<br>
</div>
</div><div><br></div></div>
</div>
</div><br>_______________________________________________<br>R-br mailing list<br><a ymailto="mailto:R-br@listas.c3sl.ufpr.br" href="mailto:R-br@listas.c3sl.ufpr.br">R-br@listas.c3sl.ufpr.br</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.<br><br></div> </div> </div> </div> </div></body></html>