<div dir="ltr"><div class="gmail_default"><div class="gmail_default"><div class="gmail_default"><font face="verdana, sans-serif">Senhores,</font></div><div class="gmail_default"><font face="verdana, sans-serif"><br></font></div><div class="gmail_default"><font face="verdana, sans-serif">Encaminho uma sugestão, criando um objeto raster para cada subset. Alternativamente poderia utilizar um único objeto do tipo RasterBrick ou RasterStack.</font></div><div class="gmail_default"><font face="verdana, sans-serif"><br></font></div><div class="gmail_default"><font face="verdana, sans-serif">### <code r></font></div><div class="gmail_default"><font face="verdana, sans-serif">set.seed(124)</font></div><div class="gmail_default"><font face="verdana, sans-serif">dados <- cbind(y=rep(c(27, 27.5, 28), each=9), x=sample(0:1, 27, rep=T))</font></div><div class="gmail_default"><font face="verdana, sans-serif">head(dados)</font></div><div class="gmail_default"><font face="verdana, sans-serif"><br></font></div><div class="gmail_default"><font face="verdana, sans-serif">table(dados[,1])</font></div><div class="gmail_default"><font face="verdana, sans-serif">unique(dados[,1]) # 27.0 27.5 28.0</font></div><div class="gmail_default"><font face="verdana, sans-serif"><br></font></div><div class="gmail_default"><font face="verdana, sans-serif">require(raster)</font></div><div class="gmail_default"><font face="verdana, sans-serif">sapply(unique(dados[,1]), function(y) {</font></div><div class="gmail_default"><font face="verdana, sans-serif"> name <- paste0("df.new.", formatC(y, 1, 5, "f", 0))</font></div><div class="gmail_default"><font face="verdana, sans-serif"> sel <- dados[dados[,1]==y, 2]</font></div><div class="gmail_default"><font face="verdana, sans-serif"> assign(name, raster(matrix(sel,3,3,byrow=T)), envir=.GlobalEnv)</font></div><div class="gmail_default"><font face="verdana, sans-serif">})</font></div><div class="gmail_default"><font face="verdana, sans-serif"><br></font></div><div class="gmail_default"><font face="verdana, sans-serif">ls(patt="df.new") #[1] "df.new.027.0" "df.new.027.5" "df.new.028.0"</font></div><div class="gmail_default"><font face="verdana, sans-serif"><br></font></div><div class="gmail_default"><font face="verdana, sans-serif">### </code></font></div></div></div><div class="gmail_extra"><br clear="all"><div><div><div dir="ltr"><div><div dir="ltr"><div><div dir="ltr"><div><div dir="ltr"><font face="arial, helvetica, sans-serif" style="font-size:small"><div style="font-family:'trebuchet ms',sans-serif;display:inline"></div></font><font face="arial, helvetica, sans-serif" style="font-size:12.8px"><span style="font-size:small">================================================</span><br>Éder Comunello</font><div style="font-size:12.8px"><span style="font-family:arial,helvetica,sans-serif">Agronomist (UEM), MSc in Environ. Sciences (UEM)</span><font face="arial, helvetica, sans-serif"><br></font></div><div style="font-size:12.8px"><div style="font-size:small"><span style="font-family:arial,helvetica,sans-serif">DSc in Agricultural Systems Engineering (USP/Esalq)</span><br></div><div><span style="font-size:small">Brazilian Agricultural Research Corporation (</span><font face="arial, helvetica, sans-serif" style="font-size:small">Embrapa)</font></div><div><div><font face="arial, helvetica, sans-serif" style="font-size:small">Dourados, MS, Brazil </font><font face="arial, helvetica, sans-serif" size="2">|<O>|</font></div><div style="font-size:small"><span style="font-family:arial,helvetica,sans-serif">================================================</span><br></div></div></div><div style="font-size:small"><font face="arial, helvetica, sans-serif">GEO, </font>-22.2752, -54.8182, 408m<span style="font-family:arial,helvetica,sans-serif"><br></span></div><div style="font-size:12.8px"><span style="font-size:small;font-family:arial,helvetica,sans-serif">UTC-04:00 / DST: UTC-03:00</span></div><div><div><div><br></div><div><br></div></div><div style="font-size:small"><br></div></div></div></div></div></div></div></div></div></div></div>
<br><div class="gmail_quote">Em 30 de março de 2016 09:40, Manoel Galdino <span dir="ltr"><<a href="mailto:mcz.fea@gmail.com" target="_blank">mcz.fea@gmail.com</a>></span> escreveu:<br><blockquote class="gmail_quote" style="margin:0px 0px 0px 0.8ex;border-left-width:1px;border-left-color:rgb(204,204,204);border-left-style:solid;padding-left:1ex"><div dir="ltr"><div><div><div>o 1:9 é indexado pelo valor de y, certo?<br></div>Vê se assim funciona<br><br></div><div># vamor primeiro criar um índice pro seu loop<br></div><div># para isso vou pegar 1:9 (y == 27), depois 10:18 (para y == 27.5) etc. e colocar numa lista<br></div><div><br></div><div>df$index <- 1:nrow(df)<br></div><div>index <- list()<br></div><div>vec <- unique(df$y)<br></div><div>for ( i in 1:length(vec)) {<br>index[[i]] <- df$index[vec[i]]<br>}<br></div><div><br></div><div># agora crio uma lista que vai armazenar o resultado de raster (.)<br></div>df.new <- list()<br></div><br><div><div><pre><code><span># faz um loop. Resultado é um lista dew data frames.<br>for</span><span> </span><span>(</span><span>i </span><span>in</span><span> unique</span><span>(</span><span>df</span><span>$</span><span>y</span><span>)){</span><span>
df.new.</span><span>[[</span><span>i</span><span>]]</span><span> </span><span><-</span><span> raster</span><span>(</span><span>matrix</span><span>(</span><span>df</span><span>$</span><span>x</span><span>[</span><span>each </span><span>43248</span><span> rows</span><span>],</span><span>204</span><span>,</span><span>212</span><span>,</span><span>byrow</span><span>=</span><span>T</span><span>))</span><span>
</span><span>}</span></code></pre>## se quiser depois juntar os data.frames, use rbind<br><br></div><div>ps.: não testei no R. Se você mandar um código que cria o df com y e x e em qual biblioteca está função raster posso testar aqui se funciona e ajustar caso tenha algum erro (bem possível).<br><br></div><div>ps.:2: se funciona, me avise que coloco como respsota no SO.<br><br></div><div>abcs<span><font color="#888888"><br></font></span></div><span><font color="#888888"><div>Manoel<br></div></font></span></div></div><div><div><div class="gmail_extra"><br><div class="gmail_quote">2016-03-29 18:19 GMT-03:00 Jefferson Ferreira-Ferreira <span dir="ltr"><<a href="mailto:jecogeo@gmail.com" target="_blank">jecogeo@gmail.com</a>></span>:<br><blockquote class="gmail_quote" style="margin:0px 0px 0px 0.8ex;border-left-width:1px;border-left-color:rgb(204,204,204);border-left-style:solid;padding-left:1ex"><div dir="ltr">Olá Manoel, obrigado pela tua mensagem.<div><br></div><div>Dados raster são imagens que contêm a descrição de cada pixel, em oposição aos vetores. Grossamente, pode-se dizer que é um "mapa" onde cada pixel representa um valor. No meu caso, valores binários (0,1) sobre presença/ausência de um fenômeno qualquer.<br></div><div><br></div><div>Levemos em consideração o exemplo que dei no stackoverflow (<a href="http://stackoverflow.com/questions/36271393/r-unmelt-a-melted-dataframe-back-to-original-dimensions" target="_blank">http://stackoverflow.com/questions/36271393/r-unmelt-a-melted-dataframe-back-to-original-dimensions</a>):</div><div><br></div><div><div>> df</div><div> y x</div><div> 1 27 1</div><div> 2 27 1</div><div> 3 27 0</div><div> 4 27 1</div><div> 5 27 0</div><div> 6 27 0</div><div> 7 27 0</div><div> 8 27 1</div><div> 9 27 1</div><div> 10 27.5 1</div><div> 11 27.5 1</div><div> 12 27.5 0</div><div> 13 27.5 1</div><div> 14 27.5 0</div><div> 15 27.5 0</div><div> 16 27.5 0</div><div> 17 27.5 1</div><div> 18 27.5 1</div></div><div><br></div><div>O resultado que preciso são objetos (do tipo raster), um para cada valor de y, com dimensões, digamos aqui, 3x3. </div><div>Eu sei que posso atingir esse resultado através de r1 <- <span style="font-family:Consolas,Menlo,Monaco,'Lucida Console','Liberation Mono','DejaVu Sans Mono','Bitstream Vera Sans Mono','Courier New',monospace,sans-serif;white-space:inherit;font-size:13px;margin:0px;padding:0px;border:0px;color:black;background-color:rgb(238,238,238)">raster</span><span style="font-family:Consolas,Menlo,Monaco,'Lucida Console','Liberation Mono','DejaVu Sans Mono','Bitstream Vera Sans Mono','Courier New',monospace,sans-serif;white-space:inherit;font-size:13px;margin:0px;padding:0px;border:0px;color:black;background-color:rgb(238,238,238)">(</span><span style="font-family:Consolas,Menlo,Monaco,'Lucida Console','Liberation Mono','DejaVu Sans Mono','Bitstream Vera Sans Mono','Courier New',monospace,sans-serif;white-space:inherit;font-size:13px;margin:0px;padding:0px;border:0px;color:black;background-color:rgb(238,238,238)">matrix</span><span style="font-family:Consolas,Menlo,Monaco,'Lucida Console','Liberation Mono','DejaVu Sans Mono','Bitstream Vera Sans Mono','Courier New',monospace,sans-serif;white-space:inherit;font-size:13px;margin:0px;padding:0px;border:0px;color:black;background-color:rgb(238,238,238)">(</span><span style="font-family:Consolas,Menlo,Monaco,'Lucida Console','Liberation Mono','DejaVu Sans Mono','Bitstream Vera Sans Mono','Courier New',monospace,sans-serif;white-space:inherit;font-size:13px;margin:0px;padding:0px;border:0px;color:black;background-color:rgb(238,238,238)">df</span><span style="font-family:Consolas,Menlo,Monaco,'Lucida Console','Liberation Mono','DejaVu Sans Mono','Bitstream Vera Sans Mono','Courier New',monospace,sans-serif;white-space:inherit;font-size:13px;margin:0px;padding:0px;border:0px;color:black;background-color:rgb(238,238,238)">$</span><span style="font-family:Consolas,Menlo,Monaco,'Lucida Console','Liberation Mono','DejaVu Sans Mono','Bitstream Vera Sans Mono','Courier New',monospace,sans-serif;white-space:inherit;font-size:13px;margin:0px;padding:0px;border:0px;color:black;background-color:rgb(238,238,238)">x</span><span style="font-family:Consolas,Menlo,Monaco,'Lucida Console','Liberation Mono','DejaVu Sans Mono','Bitstream Vera Sans Mono','Courier New',monospace,sans-serif;white-space:inherit;font-size:13px;margin:0px;padding:0px;border:0px;color:black;background-color:rgb(238,238,238)">[</span><span style="font-family:Consolas,Menlo,Monaco,'Lucida Console','Liberation Mono','DejaVu Sans Mono','Bitstream Vera Sans Mono','Courier New',monospace,sans-serif;white-space:inherit;font-size:13px;margin:0px;padding:0px;border:0px;color:maroon;background-color:rgb(238,238,238)">1:9</span><span style="font-family:Consolas,Menlo,Monaco,'Lucida Console','Liberation Mono','DejaVu Sans Mono','Bitstream Vera Sans Mono','Courier New',monospace,sans-serif;white-space:inherit;font-size:13px;margin:0px;padding:0px;border:0px;color:black;background-color:rgb(238,238,238)">],</span><span style="font-family:Consolas,Menlo,Monaco,'Lucida Console','Liberation Mono','DejaVu Sans Mono','Bitstream Vera Sans Mono','Courier New',monospace,sans-serif;white-space:inherit;font-size:13px;margin:0px;padding:0px;border:0px;color:maroon;background-color:rgb(238,238,238)">3</span><span style="font-family:Consolas,Menlo,Monaco,'Lucida Console','Liberation Mono','DejaVu Sans Mono','Bitstream Vera Sans Mono','Courier New',monospace,sans-serif;white-space:inherit;font-size:13px;margin:0px;padding:0px;border:0px;color:black;background-color:rgb(238,238,238)">,</span><span style="font-family:Consolas,Menlo,Monaco,'Lucida Console','Liberation Mono','DejaVu Sans Mono','Bitstream Vera Sans Mono','Courier New',monospace,sans-serif;white-space:inherit;font-size:13px;margin:0px;padding:0px;border:0px;color:maroon;background-color:rgb(238,238,238)">3</span><span style="font-family:Consolas,Menlo,Monaco,'Lucida Console','Liberation Mono','DejaVu Sans Mono','Bitstream Vera Sans Mono','Courier New',monospace,sans-serif;white-space:inherit;font-size:13px;margin:0px;padding:0px;border:0px;color:black;background-color:rgb(238,238,238)">,</span><span style="font-family:Consolas,Menlo,Monaco,'Lucida Console','Liberation Mono','DejaVu Sans Mono','Bitstream Vera Sans Mono','Courier New',monospace,sans-serif;white-space:inherit;font-size:13px;margin:0px;padding:0px;border:0px;color:black;background-color:rgb(238,238,238)">byrow</span><span style="font-family:Consolas,Menlo,Monaco,'Lucida Console','Liberation Mono','DejaVu Sans Mono','Bitstream Vera Sans Mono','Courier New',monospace,sans-serif;white-space:inherit;font-size:13px;margin:0px;padding:0px;border:0px;color:black;background-color:rgb(238,238,238)">=</span><span style="font-family:Consolas,Menlo,Monaco,'Lucida Console','Liberation Mono','DejaVu Sans Mono','Bitstream Vera Sans Mono','Courier New',monospace,sans-serif;white-space:inherit;font-size:13px;margin:0px;padding:0px;border:0px;color:black;background-color:rgb(238,238,238)">T</span><span style="font-family:Consolas,Menlo,Monaco,'Lucida Console','Liberation Mono','DejaVu Sans Mono','Bitstream Vera Sans Mono','Courier New',monospace,sans-serif;white-space:inherit;font-size:13px;margin:0px;padding:0px;border:0px;color:black;background-color:rgb(238,238,238)">)).</span></div><div>O caso é que eu precisaria de algo mais automatizado, que me separasse, a cada 9 linhas (nesse exemplo), um objeto cujo nome fosse df.new.(valor de y correspondente).</div><div>Espero ter conseguido ser claro. Se ficar em dúvida ainda, e puder ajudar, escreva ou dê uma olhada no <a href="http://stackoverflow.com/questions/36271393/r-unmelt-a-melted-dataframe-back-to-original-dimensions" target="_blank">post</a>.</div><div><br></div><div>Obtrigado e um abraços</div><div><div><div><br></div><div> </div><div><br></div><div class="gmail_extra"><br><div class="gmail_quote">Em 29 de março de 2016 17:01, Manoel Galdino <span dir="ltr"><<a href="mailto:mcz.fea@gmail.com" target="_blank">mcz.fea@gmail.com</a>></span> escreveu:<br><blockquote class="gmail_quote" style="margin:0px 0px 0px 0.8ex;border-left-width:1px;border-left-color:rgb(204,204,204);border-left-style:solid;padding-left:1ex"><div dir="ltr"><div><div><div>O que você quer dizer por raster? Eu não entendi direito o que você quer. Você quer uma lista com 23 objetos?<br></div>Dê um exemplo reproduzível menor, digamos com y assumindo dois valores, e qual seria o output neste caso particular.<br><br></div>abcs,<br></div>Manoel<br></div><div class="gmail_extra"><br><div class="gmail_quote"><div><div>2016-03-29 17:52 GMT-03:00 Jefferson Ferreira-Ferreira <span dir="ltr"><<a href="mailto:jecogeo@gmail.com" target="_blank">jecogeo@gmail.com</a>></span>:<br></div></div><blockquote class="gmail_quote" style="margin:0px 0px 0px 0.8ex;border-left-width:1px;border-left-color:rgb(204,204,204);border-left-style:solid;padding-left:1ex"><div><div><div dir="ltr"><div>Pessoal, estou com uma questão aberta no stackoverflow. Se alguém puder ajudar, eu ficaria muito grato!</div><div><br></div><div><a href="http://stackoverflow.com/questions/36271393/r-unmelt-a-melted-dataframe-back-to-original-dimensions" target="_blank">http://stackoverflow.com/questions/36271393/r-unmelt-a-melted-dataframe-back-to-original-dimensions</a><br></div><div><br></div><br clear="all"><div><br></div>-- <br><div><div dir="ltr"><div><div dir="ltr"><div style="text-align:left"><p style="margin-bottom:0.0001pt;line-height:normal"></p><p style="margin:0px;font-family:Tahoma,Helvetica,sans-serif;font-size:13px;text-align:-webkit-auto"><b><i><span style="font-size:11pt;font-family:Calibri,sans-serif;color:rgb(31,73,125)">Jefferson Ferreira-Ferreira</span></i></b></p><p style="margin:0px;font-family:Tahoma,Helvetica,sans-serif;font-size:13px;text-align:-webkit-auto"><span style="font-size:11pt;font-family:Calibri,sans-serif;color:gray">Geógrafo – GEOPROCESSAMENTO IDSM | Coordenadoria de TI</span></p><p style="margin:0px;text-align:-webkit-auto"><img><br></p><p style="margin:0px;font-family:Tahoma,Helvetica,sans-serif;font-size:13px;text-align:-webkit-auto"></p><p style="margin:0px;font-family:Tahoma,Helvetica,sans-serif;font-size:13px;text-align:-webkit-auto"><span style="font-family:Calibri,sans-serif;font-size:11pt"><a href="mailto:Jefferson.ferreira@mamiraua.org.br" target="_blank">Jefferson.ferreira@mamiraua.org.br</a></span></p><p style="margin:0px;font-family:Tahoma,Helvetica,sans-serif;font-size:13px;text-align:-webkit-auto"><b><span style="font-size:11pt;font-family:Calibri,sans-serif;color:rgb(3,69,20)">Instituto de Desenvolvimento Sustentável Mamirauá</span></b></p><p style="margin:0px;font-family:Tahoma,Helvetica,sans-serif;font-size:13px;text-align:-webkit-auto"></p><p style="margin:0px"><font><font size="2">Ministério da Ciência, Tecnologia e Inovação</font></font></p><p style="margin:0px"><font size="2">Telefone: <a href="tel:%2B55%2097%203343-9710" value="+559733439710" target="_blank">+55 97 3343-9710</a></font></p><p style="margin:0px"></p><p style="margin:0px;color:rgb(34,34,34);font-family:tahoma,helvetica,sans-serif;background-color:rgb(255,255,255)"><span style="font-family:arial,sans-serif;font-size:9pt"></span><img style="font-family: arial, sans-serif; font-size: 12.8px;"><b style="font-family:arial,sans-serif"><span style="font-size:9pt;font-family:Arial,sans-serif">Google Maps</span></b><span style="font-size:9pt;font-family:Arial,sans-serif"> - Mapas deste e-mail</span><span style="font-family:arial,sans-serif;font-size:9pt">:</span></p><p style="margin:0px;color:rgb(34,34,34);font-family:tahoma,helvetica,sans-serif;background-color:rgb(255,255,255)"></p><p style="margin:0px;color:rgb(34,34,34);font-family:arial,sans-serif;background-color:rgb(255,255,255)"><img style="font-size: 12.8px;"><span style="color:rgb(17,85,204);font-size:9pt;font-family:'Times New Roman',serif"><span style="color:blue"><a href="https://maps.google.com.br/maps?q=-3.355557,-64.731151&ll=-3.355471,-64.731145&spn=0.004632,0.006968&num=1&t=h&z=18" style="color:rgb(17,85,204)" target="_blank">Exibir <span style="color:rgb(34,34,34);background-color:rgb(255,255,204)">mapa</span> ampliado</a></span></span></p><p></p><p></p><i><br>Contatos particulares:</i></div><div style="text-align:left"><i><a href="tel:%2855%29%209615-0100" value="+555596150100" target="_blank">(55) 9615-0100</a></i><br></div></div></div><br></div></div>
</div>
<br></div></div>_______________________________________________<br>
R-br mailing list<br>
<a href="mailto:R-br@listas.c3sl.ufpr.br" target="_blank">R-br@listas.c3sl.ufpr.br</a><br>
<a href="https://listas.inf.ufpr.br/cgi-bin/mailman/listinfo/r-br" rel="noreferrer" 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" rel="noreferrer" target="_blank">http://www.leg.ufpr.br/r-br-guia</a>) e forneça código mínimo reproduzível.<span><font color="#888888"><br></font></span></blockquote></div><span><font color="#888888"><br><br clear="all"><br>-- <br><div>Manoel Galdino<br><a href="https://sites.google.com/site/galdinomcz/" target="_blank">https://sites.google.com/site/galdinomcz/</a><br></div>
</font></span></div>
<br>_______________________________________________<br>
R-br mailing list<br>
<a href="mailto:R-br@listas.c3sl.ufpr.br" target="_blank">R-br@listas.c3sl.ufpr.br</a><br>
<a href="https://listas.inf.ufpr.br/cgi-bin/mailman/listinfo/r-br" rel="noreferrer" 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" rel="noreferrer" target="_blank">http://www.leg.ufpr.br/r-br-guia</a>) e forneça código mínimo reproduzível.<br></blockquote></div><br><br clear="all"><div><br></div>-- <br><div><div dir="ltr"><div><div dir="ltr"><div style="text-align:left"><p style="margin-bottom:0.0001pt;line-height:normal"></p><p style="margin:0px;font-family:Tahoma,Helvetica,sans-serif;font-size:13px;text-align:-webkit-auto"><b><i><span style="font-size:11pt;font-family:Calibri,sans-serif;color:rgb(31,73,125)">Jefferson Ferreira-Ferreira</span></i></b></p><p style="margin:0px;font-family:Tahoma,Helvetica,sans-serif;font-size:13px;text-align:-webkit-auto"><span style="font-size:11pt;font-family:Calibri,sans-serif;color:gray">Geógrafo – GEOPROCESSAMENTO IDSM | Coordenadoria de TI</span></p><p style="margin:0px;text-align:-webkit-auto"><img><br></p><p style="margin:0px;font-family:Tahoma,Helvetica,sans-serif;font-size:13px;text-align:-webkit-auto"></p><p style="margin:0px;font-family:Tahoma,Helvetica,sans-serif;font-size:13px;text-align:-webkit-auto"><span style="font-family:Calibri,sans-serif;font-size:11pt"><a href="mailto:Jefferson.ferreira@mamiraua.org.br" target="_blank">Jefferson.ferreira@mamiraua.org.br</a></span></p><p style="margin:0px;font-family:Tahoma,Helvetica,sans-serif;font-size:13px;text-align:-webkit-auto"><b><span style="font-size:11pt;font-family:Calibri,sans-serif;color:rgb(3,69,20)">Instituto de Desenvolvimento Sustentável Mamirauá</span></b></p><p style="margin:0px;font-family:Tahoma,Helvetica,sans-serif;font-size:13px;text-align:-webkit-auto"></p><p style="margin:0px"><font><font size="2">Ministério da Ciência, Tecnologia e Inovação</font></font></p><p style="margin:0px"><font size="2">Telefone: <a href="tel:%2B55%2097%203343-9710" value="+559733439710" target="_blank">+55 97 3343-9710</a></font></p><p style="margin:0px"></p><p style="margin:0px;color:rgb(34,34,34);font-family:tahoma,helvetica,sans-serif;background-color:rgb(255,255,255)"><span style="font-family:arial,sans-serif;font-size:9pt"></span><img style="font-family: arial, sans-serif; font-size: 12.8px;"><b style="font-family:arial,sans-serif"><span style="font-size:9pt;font-family:Arial,sans-serif">Google Maps</span></b><span style="font-size:9pt;font-family:Arial,sans-serif"> - Mapas deste e-mail</span><span style="font-family:arial,sans-serif;font-size:9pt">:</span></p><p style="margin:0px;color:rgb(34,34,34);font-family:tahoma,helvetica,sans-serif;background-color:rgb(255,255,255)"></p><p style="margin:0px;color:rgb(34,34,34);font-family:arial,sans-serif;background-color:rgb(255,255,255)"><img style="font-size: 12.8px;"><span style="color:rgb(17,85,204);font-size:9pt;font-family:'Times New Roman',serif"><span style="color:blue"><a href="https://maps.google.com.br/maps?q=-3.355557,-64.731151&ll=-3.355471,-64.731145&spn=0.004632,0.006968&num=1&t=h&z=18" style="color:rgb(17,85,204)" target="_blank">Exibir <span style="color:rgb(34,34,34);background-color:rgb(255,255,204)">mapa</span> ampliado</a></span></span></p><p></p><p></p><i><br>Contatos particulares:</i></div><div style="text-align:left"><i><a href="tel:%2855%29%209615-0100" value="+555596150100" target="_blank">(55) 9615-0100</a></i><br></div></div></div><br></div></div>
</div></div></div></div>
<br>_______________________________________________<br>
R-br mailing list<br>
<a href="mailto:R-br@listas.c3sl.ufpr.br" target="_blank">R-br@listas.c3sl.ufpr.br</a><br>
<a href="https://listas.inf.ufpr.br/cgi-bin/mailman/listinfo/r-br" rel="noreferrer" 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" rel="noreferrer" target="_blank">http://www.leg.ufpr.br/r-br-guia</a>) e forneça código mínimo reproduzível.<br></blockquote></div><br><br clear="all"><br>-- <br><div>Manoel Galdino<br><a href="https://sites.google.com/site/galdinomcz/" target="_blank">https://sites.google.com/site/galdinomcz/</a><br></div>
</div>
</div></div><br>_______________________________________________<br>
R-br mailing list<br>
<a href="mailto:R-br@listas.c3sl.ufpr.br" target="_blank">R-br@listas.c3sl.ufpr.br</a><br>
<a href="https://listas.inf.ufpr.br/cgi-bin/mailman/listinfo/r-br" rel="noreferrer" 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" rel="noreferrer" target="_blank">http://www.leg.ufpr.br/r-br-guia</a>) e forneça código mínimo reproduzível.<br></blockquote></div><br></div></div>