<html><body><div style="color:#000; background-color:#fff; font-family:times new roman, new york, times, serif;font-size:12pt"><div><span>Ok. Muito obrigada Paulo e aos demais. Utilizei interpp e funcionou.</span></div><div><span><br></span></div><div><span><br></span></div><div><br></div><div style="font-size: 12pt; font-family: 'times new roman', 'new york', times, serif; "><div style="font-size: 12pt; font-family: 'times new roman', 'new york', times, serif; "><font size="2" face="Arial"><hr size="1"><b><span style="font-weight:bold;">De:</span></b> Paulo Justiniano <paulojus@leg.ufpr.br><br><b><span style="font-weight: bold;">Para:</span></b> "r-br@listas.c3sl.ufpr.br" <r-br@listas.c3sl.ufpr.br><br><b><span style="font-weight: bold;">Enviadas:</span></b> Domingo, 2 de Outubro de 2011 21:20<br><b><span style="font-weight: bold;">Assunto:</span></b> Re: [R-br] Dúvida<br></font><br>Neste contexto de seus dados, para algorítmos de
interpolação<br>(e nao modelos espaciais!)<br>verifique entao:<br><br>**- função interpp() do pacote akima<br>- ou gam() do pacote mgcv<br><br><br><br>On Sun, 2 Oct 2011, daiane brondani wrote:<br><br>> Olá Walmes. Muito obrigada. Desculpe eu não ter sido mais específica, eu sou nova não somente no R, mas neste site<br>> de ajuda também. Estou tentando interpolar latitude, longitude e amplitude num gráfico. O meu problema está nesta<br>> interpolação que quero fazer. <br>> <br>> function ()<br>> {<br>> ur.rs<-matrix(scan(" "),ncol=4,byrow=T)<br>> dat<-ur.rs<br>> lat<-dat[,1]<br>> lon<-dat[,2]<br>> ampl<-dat[,3]<br>>
peak<-dat[,4]<br>> <br>> contour(interp(lon,lat,ampl))<br>> #<br>> # points(lon,lat)<br>> text(lon,lat,ampl,col=4)<br>> readline()<br>> contour(interp(lon,lat,peak))<br>> #<br>> # points(lon,lat)<br>> text(lon,lat,peak,col=4)<br>> <br>> <br>> <br>> ____________________________________________________________________________________________________________________<br>> De: Walmes Zeviani <<a ymailto="mailto:walmeszeviani@gmail.com"
href="mailto:walmeszeviani@gmail.com">walmeszeviani@gmail.com</a>><br>> Para: <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>> Enviadas: Domingo, 2 de Outubro de 2011 19:09<br>> Assunto: Re: [R-br] Dúvida<br>> <br>> Uma alternativa é usar a função approx(), veja<br>> <br>> x <- 1:10<br>> y <- x+rnorm(x,0,1)<br>> plot(y~x)<br>> <br>> x. <- seq(1,10,0.1)<br>> y. <- approx(x, y, xout=x.)<br>> str(y.)<br>> <br>> plot(y.)<br>> <br>> À disposição.<br>> Walmes.<br>> <br>> ==========================================================================<br>> Walmes Marques Zeviani<br>> LEG (Laboratório de Estatística e Geoinformação, 25.450418 S, 49.231759 W)<br>> Departamento de Estatística - Universidade Federal do Paraná<br>> fone: (+55) 41 3361 3573<br>> VoIP: (3361 3600) 1053 1173<br>>
e-mail: <a ymailto="mailto:walmes@ufpr.br" href="mailto:walmes@ufpr.br">walmes@ufpr.br</a><br>> twitter: @walmeszeviani<br>> homepage: <a href="http://www.leg.ufpr.br/~walmes" target="_blank">http://www.leg.ufpr.br/~walmes</a><br>> linux user number: 531218<br>> ==========================================================================<br>> <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>>
<br>><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></body></html>