<div dir="ltr">Senhores, boa tarde!<div><br></div><div>Tenho um código básico que pode ser desenvolvido...<br><div><br></div><div><font face="courier new, monospace">### <code r></font><div><div><font face="courier new, monospace">require(MASS)</font></div>
<div><font face="courier new, monospace">topo</font></div><div><font face="courier new, monospace">gd <- as.geodata(topo); names(gd)</font></div><div><font face="courier new, monospace"><br></font></div><div><font face="courier new, monospace">plot.geodata(gd)</font></div>
<div><font face="courier new, monospace">attach(gd)</font></div><div><font face="courier new, monospace"><br></font></div><div><font face="courier new, monospace">### 1</font></div><div><font face="courier new, monospace">plot(coords, xlab = "X Coord", ylab = "Y Coord ", type = "n")</font></div>
<div><font face="courier new, monospace">#polygon(borders)</font></div><div><font face="courier new, monospace">dCut <- cut(data, breaks = unique(quantile(data)), include.l=T, labels=F)</font></div><div><font face="courier new, monospace">points(coords, pch = (1:4)[dCut], col=2:7)</font></div>
<div><font face="courier new, monospace"><br></font></div><div><font face="courier new, monospace">### 2</font></div><div><font face="courier new, monospace">plot(data, coords[, 2], ylab = "Y Coord", xlab = "data", cex = 1)</font></div>
<div><font face="courier new, monospace">lowY <- lowess(data ~ coords[,2])</font></div><div><font face="courier new, monospace">lines(lowY[[2]],lowY[[1]], col=2)</font></div><div><font face="courier new, monospace"><br>
</font></div><div><font face="courier new, monospace">### 3</font></div><div><font face="courier new, monospace">plot(coords[, 1], data, xlab = "X Coord", ylab = "data", cex = 1)</font></div><div><font face="courier new, monospace">lowX <- lowess(data ~ coords[,1])</font></div>
<div><font face="courier new, monospace">lines(lowX, col=2)</font></div><div><font face="courier new, monospace"><br></font></div><div><font face="courier new, monospace">### 4</font></div><div><font face="courier new, monospace">hist(data, main='', xlab = 'data', prob = T)</font></div>
<div><font face="courier new, monospace">lines(density(data), col=2)</font></div><div><font face="courier new, monospace">### </code></font></div><div><br></div></div></div></div></div><div class="gmail_extra"><br clear="all">
<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><br><div class="gmail_quote">Em 12 de março de 2014 16:47, Hélio Gallo Rocha <span dir="ltr"><<a href="mailto:heliogallorocha@gmail.com" target="_blank">heliogallorocha@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">Paulo, fiz o que sugeriu, <div><br></div><div>No sentido leste -oeste deu certo<br><div><br></div><div><div>plot(gd$data~E); lines(lowess(gd$data~E))</div><div><br></div><div><br></div><div>Mas no sentido norte-sul não. </div>
<div>Não sei o que estou fazendo errado.</div><div><br></div><div>Acho que a comando seria este, invertendo a posição dos dados e da coordenada, </div><div>plot(N~gd$data); lines(lowess(N~gd$data))</div>
<div> </div><div> mas linha mediana não ficou igual quando uso <br></div><div>plot(gd, low=T)</div><div><br></div><div><br></div><div>Quando inverto</div><div>plot(gd$data~N); lines(lowess(gd$data~N))</div></div>
</div><div><br></div><div>a linha fica certa, mas fica invertido o eixo, ou seja , ao invés de N ficar no eixo Y, fica no eixo X.<br></div><div><br></div><div>Não que ão dê para entender ou interpretar, mas acho que se se o sentido NS ficar no eixo Y seria mais melhor.</div>
<div><br></div><div>Hélio</div></div><div class="gmail_extra"><br><br><div class="gmail_quote">Em 12 de março de 2014 15:35, Paulo Justiniano [via R-br] <span dir="ltr"><<a href="mailto:ml-node+s2285057n4661708h16@n4.nabble.com" target="_blank">ml-node+s2285057n4661708h16@n4.nabble.com</a>></span> escreveu:<br>
<blockquote class="gmail_quote" style="margin:0 0 0 .8ex;border-left:1px #ccc solid;padding-left:1ex"><div class="">
uma simples sobreposição de graficos....
<br><br>sobreponha a saida da funcao lowess a seu grafico de pontos
<br><br><br>algo na linha de (verificar detalhes das chamadas das funcoes
<br><br>plot(dados ~ coordenadaX)
<br>lines(lowess(dados ~coordenadas))
<br><div><br><br><br><br>On Wed, 12 Mar 2014, Hélio Gallo Rocha wrote:
<br></div></div><div><div><div class=""><div><br>> Prof. Paulo, obrigado pela dica.
<br>> O primeiro eu sei fazer, mas os que mostram a variação dos dados com relação as coordenadas também, mas como faço a linha média dos dados com relação as
<br>> coordenadas, quando adiciono low=T
<br>>
<br>> vou testar os argumentos width e height
<br>>
<br>>
<br>> Grato
<br>>
<br>> Hélio
<br>>
<br>>
<br>>
<br>>
<br></div></div>> Em 12 de março de 2014 11:31, Paulo Justiniano [via R-br] <<a href="http://user/SendEmail.jtp?type=node&node=4661708&i=0" rel="nofollow" link="external" target="_blank">[hidden email]</a>> escreveu:
<br><div><div class="h5"><div><div>> a funcao tem o objetivo de uma visualizacao rápida
<br>>
<br>> se deseja individualizados é só fazer um a um , uma vez que são gráficos
<br>> simples de serem obtidos
<br>> notue que o 1o deles pode ser obtido com points.geodata()
<br>>
<br>> quanto as fontes controle nos graficos que vai gerar
<br>>
<br>> de forma mais geral, use os argumentos das funcoes graficas (tipicamente
<br>> width e height) apra controlar o tamanha de figura e fontes
<br>> (menor figura- maiores as fontes no gráfico
<br>>
<br>> ote que tudo isto nao tem nada há ver especificamente com graficos da geoR
<br>> e se aplicam de forma geral
<br>>
<br>>
<br>>
<br>>
<br>> On Wed, 12 Mar 2014, Hélio Gallo Rocha wrote:
<br>>
<br>> > Listeiros, bom dia.
<br>> > Em um objeto da classe geodata (pacote geoR) , ao usar o comando plot é produzido um gráfico quadruplo, um com a posição dos pontos, dois
<br>> mostrando o
<br>> > comportamento da variável com relação aos sentidos NS e SW e um Histograma.
<br>> >
<br>> > Como poderia separar os gráficos de comportamento?
<br>> >
<br>> > Outra dúvida. Teria como editar as fontes dos eixos x e y? aumentar a fonte ou negrito.
<br>> >
<br>> > Grato a todos
<br>> > --
<br>> > Hélio Gallo Rocha
<br>> > IFSULDEMINAS - Câmpus Muzambinho
<br>> >
<br>> >
<br>> _______________________________________________
<br>> R-br mailing list
<br>> [hidden email]
<br>> <a href="https://listas.inf.ufpr.br/cgi-bin/mailman/listinfo/r-br" rel="nofollow" link="external" 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="nofollow" link="external" target="_blank">http://www.leg.ufpr.br/r-br-guia</a>) e forneça código mínimo reproduzível.
<br>>
<br></div></div>> __________________________________________________________________________________________________________________________________________________________________
<br><div>> If you reply to this email, your message will be added to the discussion below:
<br>> <a href="http://r-br.2285057.n4.nabble.com/R-br-grafico-de-dispersao-em-geoestatistica-tp4661695p4661701.html" rel="nofollow" link="external" target="_blank">http://r-br.2285057.n4.nabble.com/R-br-grafico-de-dispersao-em-geoestatistica-tp4661695p4661701.html</a><br>
> To unsubscribe from R-br, click here.
<br>> NAML
<br>>
<br>>
<br>>
<br>>
<br>> --
<br>> Hélio Gallo Rocha
<br>> IFSULDEMINAS - Câmpus Muzambinho
<br>>
<br>></div></div></div></div></div><div><div class="h5"><div>_______________________________________________
<br>R-br mailing list
<br><a href="http://user/SendEmail.jtp?type=node&node=4661708&i=1" rel="nofollow" link="external" target="_blank">[hidden email]</a>
<br><a href="https://listas.inf.ufpr.br/cgi-bin/mailman/listinfo/r-br" rel="nofollow" link="external" 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="nofollow" link="external" target="_blank">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">
</div></div></div><div style="color:#444;font:12px tahoma,geneva,helvetica,arial,sans-serif"><div><div class="h5"><div>
<div style="font-weight:bold">If you reply to this email, your message will be added to the discussion below:</div>
</div></div></div><a href="http://r-br.2285057.n4.nabble.com/R-br-grafico-de-dispersao-em-geoestatistica-tp4661695p4661708.html" target="_blank">http://r-br.2285057.n4.nabble.com/R-br-grafico-de-dispersao-em-geoestatistica-tp4661695p4661708.html</a>
</div><div class=""><div><div>
<div style="color:#666;font:11px tahoma,geneva,helvetica,arial,sans-serif;margin-top:.4em;line-height:1.5em">
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" rel="nofollow" style="font:9px serif" target="_blank">NAML</a>
</div></div></div></div></blockquote></div><div class=""><br><br clear="all"><div><br></div>-- <br>Hélio Gallo Rocha<br>IFSULDEMINAS - Câmpus Muzambinho<br>
</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>