
Bom dia pessoal, venho mais uma vez pedir ajuda de vocês, O problema é o seguinte, tenho 7 pastas(Cenários), dentro dos mesmo tenho 949 arquivos TXT (1.5 Mb) cada, preciso carregar estes 7*949 arquivos e guardar em um array, tenho que carregar tudo pois tudo isso será plotado. meu código é o seguinte: cenarios <- c(1:7) con <- 1 for (i in cenarios){ setwd(paste('C:\\Users\\l01199\\Desktop\\Modelo\\Resultados\\Modelo_Cenario',i,'_Q1300',sep='')) files <- sort(list.files(pattern = "m000.TXT"))[1:50] tempo <- as.numeric(gsub("m000.TXT","",gsub("CON", "", files))) dim.a <- c(dim(read.table(files[1],head=T)),length(tempo)) if(con==1){ dados <- array(NA,c(length(cenarios),dim.a)) nomes.col <- names(read.table(files[1],head=T)) } con1 <- 1 for (j in files){ dados[con,,,con1] <- as.matrix(read.table(j,head=TRUE)) con1 <- con1+1 } print(con) con <- con+1 } tenho 4 gb de memoria na maquina, porem quando crio o objeto dados que é um array de tamanho c(length(cenarios),dim.a) [1] 7 11069 11 949 Não tenho memoria para tudo isso, alguém tem uma sugestão para guardar isso, dei uma olhada no pacote SOAR, mas como ele guarda e depois tenho que acessar novamente não sei se é a melhor saída(Posso estar equivocado em minha interpretação). Alguém possui um dica para contornar este problema. Att