<div dir="ltr">Valeu Éder,<div><br></div><div>Muito obrigado.</div></div><div class="gmail_extra"><br clear="all"><div><div dir="ltr"><div style="text-align:center"><font size="1">Hélder Gramacho dos Santos</font></div><div style="text-align:center">
<font size="1">Engenheiro Agrônomo</font></div><div style="text-align:center"><font size="1">Mestrando Ciênc. Geod. Tec. Geoinformação-UFPE</font></div><div style="text-align:center"><font size="1"><i style="color:rgb(51,51,255)"><div style="display:inline!important">
<i><a href="mailto:agrohelder@hotmail.com" target="_blank">agrohelder@gmail.com</a></i></div></i><br></font></div><div style="text-align:center"><br></div></div></div>
<br><br><div class="gmail_quote">Em 5 de março de 2014 12:06, Éder Comunello <span dir="ltr"><<a href="mailto:comunello.eder@gmail.com" target="_blank">comunello.eder@gmail.com</a>></span> escreveu:<br><blockquote class="gmail_quote" style="margin:0 0 0 .8ex;border-left:1px #ccc solid;padding-left:1ex">
<div dir="ltr">Helder, bom dia!<div><br></div><div>Os dados do Paraná são do Prof. Paulo Justiniano. O que te relatei fiquei sabendo quando fiz a disciplina de Geoestatística que ele ministrou na Esalq.</div><div><br></div>

<div>É possível fazer a conversão no R, usando {sp} e {rgdal}. Segue um exemplo para duas coordenadas tomadas no fuso 22 e calculadas para o fuso 23...</div><div><br></div><div><font face="courier new, monospace">### <code r></font></div>

<div><div><font face="courier new, monospace">sapply(c('rgdal','sp'), require, character.only=T)</font></div><div><font face="courier new, monospace">fuso22 <- data.frame(X=c(765755.252, 806567.125), Y=c<a href="tel:%287726003.670" value="+17726003670" target="_blank">(7726003.670</a>, <a href="tel:7657549.738" value="+17657549738" target="_blank">7657549.738</a>)); fuso22</font></div>

<div><font face="courier new, monospace">coordinates(fuso22) <- ~X+Y</font></div><div><font face="courier new, monospace">proj4string(fuso22) <- CRS("+proj=utm +zone=22 +south +datum=WGS84 +units=m +no_defs")</font></div>

<div><font face="courier new, monospace">fuso22</font></div><div><font face="courier new, monospace"><br></font></div><div><font face="courier new, monospace">fuso23 <- spTransform(fuso22, CRS("+proj=utm +zone=23 +south +datum=WGS84 +units=m +no_defs"))</font></div>

<div><font face="courier new, monospace">fuso23</font></div></div><div><font face="courier new, monospace">### </code></font></div><div class=""><div><br></div><div><br></div><div class="gmail_extra"><div><div dir="ltr">
Éder Comunello <<a href="mailto:comunello.eder@gmail.com" target="_blank">c</a><a href="mailto:omunello.eder@gmail.com" target="_blank">omunello.eder@gmail.com</a>> <br>
Dourados, MS - [22 16.5'S, 54 49'W]<br></div></div>
<br></div></div></div>
<br>_______________________________________________<br>
R-br mailing list<br>
<a 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></blockquote></div><br></div>