Sim, alguem pode te ajudar... mas depende muito de vc ajudar o alguem primeiro.... Qual o truque para sair de S20040322004060 para "mes 2"? (minha bola de cristal diz que o ano corresponde aos 4 primeiros digitos apos S, mas isso eh soh uma hipotese, jah que vc nao disse explicitamente)<div>
<br></div><div>b<br><br><div class="gmail_quote">2012/3/29 Humberto Hazin <span dir="ltr"><<a href="mailto:hghazin@hotmail.com">hghazin@hotmail.com</a>></span><br><blockquote class="gmail_quote" style="margin:0 0 0 .8ex;border-left:1px #ccc solid;padding-left:1ex">
Prezados,<br>
<br>
Venho mais uma vez pedir ajuda a voces para resolver um problema!<br>
<br>
baixei uma série de images de satelite, por ano e mes (2004 a 2010) totalizando 163 arquivos ate ai tudo bem! Por termos de comodidade gostaria de criar um loop para nao ter que digitar essas 163 linhas ou mais para extrair latitude, longitude e SST. conforme o codigo abaixo:<br>
<br>
hdf4to5("S20040012004031.hdf")<u></u>;m0401 <- satinGet("S20040012004031.<u></u>hdf5",lats=c(10, -30), lons=c(-20, -50), itype="oceancolor")<br>
m0401<-(simplifySat(m0401, extent=1));m0401<-extract(<u></u>m0401);m0401<-data.frame(<u></u>m0401);m0401$mes<-1; m0401$year<-2004<br>
<br>
hdf4to5("S20040322004060.hdf")<u></u>;m0402 <- satinGet("S20040322004060.<u></u>hdf5",lats=c(10, -30), lons=c(-20, -50), itype="oceancolor")<br>
m0402<-(simplifySat(m0402, extent=1));m0402<-extract(<u></u>m0402);m0402<-data.frame(<u></u>m0402);m0402$mes<-2; m0402$year<-2004<br>
<br>
Alguem poderia me ajudar!<br>
<br>
Nao coloquei o arquivo pois é muito grande quase 36gigas porém caso precisem posso colocar o parte do codigo para baixarem um ou mais arquivos e testarem<br>
<br>
Humberto<br>
<br>
______________________________<u></u>_________________<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" target="_blank">https://listas.inf.ufpr.br/<u></u>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-<u></u>guia</a>) e forneça código mínimo reproduzível.<br>
</blockquote></div><br></div>