Cara quando eu executo vários arquivos faço o seguinte
a<-dir("diretório dos seus arquivos") # aqui cria um vetor com as strings
dos diretórios (nome dos arquivos no seu caso)
tabela<-matrix(NA,2,2)
resultados<-tabela
s=0
e para dar nome para eles do jeito que vc está querendo e criar a variável
vc pode pegar o nome
while(s< length(a)){
s=1+s # conta
+1 na leitura do arquivo
nome_do_arquivo<-substr(a[s],0,nchar(a[s])-4) # retira o nome da
variável do nome do arquivo (subtrai o .tif)
arquivo<-raster('lai{ano}{diajuliano}.tif') #carrega seu tif
multiplicado<-arquivo*0.001 # multiplica por
0.001
tabela[s,]<-assing(nome_do_arquivo,multiplicado) # atribui o resultado da
multiplicação a vaiavel gerada e armazena em uma tabela na linha escolhida
lá
}
s=0
f=0
while(f< length(a)){
s=s+1
f=4*s
g=f-3
resultados[s,]<-tabela[c(g:f),]
colnames(resultados)<-cut(seq(ISOdate(2001,1,1),to=ISOdate(2011,12,31),by="month"),"month")
}
deve funcionar
qualquer coisa de uma olhada no que as funções fazem
_______________________________________________
R-br mailing list
[email protected]
https://listas.inf.ufpr.br/cgi-bin/mailman/listinfo/r-br
Leia o guia de postagem (http://www.leg.ufpr.br/r-br-guia) e forneça código
mínimo reproduzível.
