<div dir="ltr"><div dir="ltr"><div dir="ltr">Olá!<div>Estou com um arquivo muito grande, do stata, pra ser aberto...</div><div><br></div><div>A versão do stata que tenho está abaixo da versão utilizada pra gerar o arquivo com o qual preciso trabalhar, de modo que não posso manipulá-lo : dividir, salvar em txt.... nada disso...</div><div><br></div><div>E ele é muito grande....</div><div><br></div><div>tentei importar no R e deu estouro de memória....</div><div>-------</div><div><div># 1st trying .................27/11/2018</div><div># -----</div><div>library(rio)</div><div>df <- import(file = "parte1.dta")</div><div>#---------------------</div><div>#    Error: memory exhausted (limit reached?)<br></div><div>#    Time difference of 10.22388 mins<br></div><div>#</div><div>#</div><div>#</div><div># 2nd trying .................27/11/2018</div><div># -----</div><div>library(haven)</div><div>df2 <- read_dta("

parte1.dta", encoding = NULL)</div><div>#---------------------  <br></div><div>#    Error: memory exhausted (limit reached?)</div><div>#    In addition: Warning message:</div><div>#      In doTryCatch(return(expr), name, parentenv, handler) :</div><div>#      restarting interrupted promise evaluation</div><div>#</div><div>#    Time difference of 9.341693 mins</div><div># </div><div># </div><div># </div><div># 3rd trying .................27/11/2018</div><div># -----</div><div># library(rio)</div><div># convert("parte1.dta", "parte1.txt")</div><div>#---------------------  <br></div><div>#    Error: memory exhausted (limit reached?)</div><div>#    Time difference of 10.64566 mins</div></div><div><br></div><div><br></div><div><br></div><div><br></div><div><br></div><div>Alguem tem alguma sugestao pra eu conseguir abrir aos pouquinhos????</div><div>Pergunto isso pq, se fosse txt acho que dava, com os comandos a seguir:</div><div>-------</div><div><div>dados <- as.data.frame(scan("parte1.dta", skip=1,what=as.list(rep("\t",7))))</div><div># não leu, mas parece que são 462 variáveis  ===>  462 obs. of 7 variables</div><div><br></div><div>heade_ <- unlist(scan("parte1.dta", nlines=1,what=as.list(rep("\t",7))))</div></div><div><br></div><div><br clear="all"><div><div dir="ltr" class="gmail_signature"><div dir="ltr"><div><div dir="ltr"><div><div dir="ltr"><div><div dir="ltr"><div><div dir="ltr">------------------------</div><div dir="ltr"><div>Cinara Santos</div><div><span style="font-size:12.8px">whatsApp </span><span style="font-size:12.8px">(32) 9.8416-0441</span></div></div></div></div></div></div></div></div></div></div></div></div></div></div></div></div>