Você tem o TabWin instalado?  Use-o para descomprimir o .dbc<br><br><div><a href="https://overview.mail.yahoo.com/mobile/?.src=Android">Sent from Yahoo Mail on Android</a></div> <br> <blockquote style="margin: 0 0 20px 0;font-family:Roboto, sans-serif; color:#6D00F6;"> <header> <div>On Mon, 16 Nov, 2015 at 0:45, Mauro Sznelwar</div><div><sznelwar@uol.com.br> wrote:</div> </header> <div style="padding: 10px 0 0 20px; margin: 10px 0 0 0; border-left: 1px solid #6D00F6; color: initial;"> <div id="msgSandbox_ABcNiWIABmGIVkkZQQccUBgSd44_TEXT" class="msgSandbox" style="padding: 1.5em 0.5em 0.5em 1.2em; word-wrap: break-word;">Eu tentei rodar este script, mas a partir daí não rodou mais!<br clear="none"><br clear="none">> system.time(d <- foreign:::read.dbf(gsub('dbc','dbf',b)))<br clear="none">Error in foreign:::read.dbf(gsub("dbc", "dbf", b)) : <br clear="none">  unable to open DBF file<br clear="none">Timing stopped at: 0.01 0 0.02 <br clear="none">> <br clear="none">> dim(d)<br clear="none">Error: object 'd' not found<br clear="none">> <br clear="none">> system.time(save(d, file=gsub('.dbc','d.RData',b))) system.time(save(d, file=gsub('.dbc','c.RData',b), compress='xz'))<br clear="none">Error: unexpected symbol in "system.time(save(d, file=gsub('.dbc','d.RData',b))) system.time"<br clear="none">> <br clear="none">> system(paste('ls -lh ', substr(b,1,8), "*", sep=''))<br clear="none">Warning message:<br clear="none">running command 'ls -lh RDSP1509*' had status 127 <br clear="none">> <br clear="none">> system.time(load(gsub('.dbc','d.RData',b)))<br clear="none">Error in readChar(con, 5L, useBytes = TRUE) : cannot open the connection<br clear="none">In addition: Warning message:<br clear="none">In readChar(con, 5L, useBytes = TRUE) :<br clear="none">  cannot open compressed file 'RDSP1509d.RData', probable reason 'No such file or directory'<br clear="none">Timing stopped at: 0 0 0 <br clear="none">> system.time(load(gsub('.dbc','c.RData',b)))<br clear="none">Error in readChar(con, 5L, useBytes = TRUE) : cannot open the connection<br clear="none">In addition: Warning message:<br clear="none">In readChar(con, 5L, useBytes = TRUE) :<br clear="none">  cannot open compressed file 'RDSP1509c.RData', probable reason 'No such file or directory'<br clear="none">Timing stopped at: 0 0 0 <br clear="none">><br clear="none"><br clear="none"><br clear="none"><br clear="none">Caros,<br clear="none"><br clear="none">DBC é um DBF comprimido. Assim, (sempre) sairá um .dbf de um .dbc.<br clear="none"><br clear="none">A sugestão de usar .RData (formato de dados do R) é útil apenas no caso <br clear="none">de precisar carregar os mesmos dados mais de uma vez no ambiente R. Isto <br clear="none">porque o caminho para sair de um .dbc até um .RData envolve descomprimir <br clear="none">o .dbc, ler o .dbf em R e salvar para .RData. Não vejo saída ao processo <br clear="none">de descomprimir .dbc e ler .dbf. Usar .RData é vantajoso para economizar <br clear="none">tempo e espaço em disco.<br clear="none"><br clear="none">Exemplo: 202143 internações hospitalares em SP (estado) em Outubro<br clear="none">(disponível em <br clear="none"><a shape="rect" href="ftp://ftp.datasus.gov.br/dissemin/publicos/SIHSUS/200801_/Dados/" target="_blank">ftp://ftp.datasus.gov.br/dissemin/publicos/SIHSUS/200801_/Dados/</a>)<br clear="none">Ao final disponibilizo o script utilizado.<br clear="none"><br clear="none">Atividade                     segundos<br clear="none">--------------------------------------<br clear="none">download do arquivo              47.11<br clear="none">extrair .dbf do .dbc              2.29<br clear="none">ler o arquivo .dbf em R           6.57<br clear="none">salvar .RData (default)           2.35<br clear="none">salvar .Rdata (compress='xz')    19.00<br clear="none">ler .RData (compress default)     0.51<br clear="none">ler .RData (compress xz)          0.74<br clear="none">--------------------------------------<br clear="none"><br clear="none">Os tamanhos em disco dos quatro arquivos em questão são<br clear="none">  .dbc               15.0 Mb<br clear="none">  .dbf              136.0 Mb<br clear="none">  .RData (default)    7.5 Mb<br clear="none">  .RData (xz)         4.6 Mb<br clear="none"><br clear="none">Creio que esses números podem ajudar a decidir a melhor opção.<br clear="none"><br clear="none">Elias<br clear="none"><br clear="none">PS.: script utilizado para o exemplo:<br clear="none"><br clear="none"><br clear="none">a <- paste('ftp://ftp.datasus.gov.br/',<br clear="none">            'dissemin/publicos/SIHSUS/',<br clear="none">            '200801_/Dados/', sep='')<br clear="none">b <- 'RDSP1509.dbc'<br clear="none"><br clear="none">system.time(download.file(paste(a,b,sep=''), b))<br clear="none"><br clear="none">system.time(system(paste(<br clear="none">     'wine ../TabWin/dbf2dbc.exe', b)))<br clear="none"><br clear="none">system.time(d <- foreign:::read.dbf(gsub('dbc','dbf',b)))<br clear="none"><br clear="none">dim(d)<br clear="none"><br clear="none">system.time(save(d, file=gsub('.dbc','d.RData',b)))<br clear="none">system.time(save(d, file=gsub('.dbc','c.RData',b), compress='xz'))<br clear="none"><br clear="none">system(paste('ls -lh ', substr(b,1,8), "*", sep=''))<br clear="none"><br clear="none">system.time(load(gsub('.dbc','d.RData',b)))<br clear="none">system.time(load(gsub('.dbc','c.RData',b)))<br clear="none"><br clear="none"><br clear="none">_______________________________________________<br clear="none">R-br mailing list<br clear="none"><a shape="rect" ymailto="mailto:R-br@listas.c3sl.ufpr.br" href="javascript:return">R-br@listas.c3sl.ufpr.br</a><br clear="none"><a shape="rect" 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 clear="none">Leia o guia de postagem (<a shape="rect" href="http://www.leg.ufpr.br/r-br-guia" target="_blank">http://www.leg.ufpr.br/r-br-guia</a>) e fornea cdigo mnimo reproduzvel.<br clear="none"><br clear="none"><br clear="none">---<br clear="none">Este email foi escaneado pelo Avast antivírus.<br clear="none"><a shape="rect" href="https://www.avast.com/antivirus" target="_blank">https://www.avast.com/antivirus</a><div class="yQTDBase yqt7573952897" id="yqtfd72488"><br clear="none"><br clear="none">_______________________________________________<br clear="none">R-br mailing list<br clear="none"><a shape="rect" ymailto="mailto:R-br@listas.c3sl.ufpr.br" href="javascript:return">R-br@listas.c3sl.ufpr.br</a><br clear="none"><a shape="rect" 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 clear="none">Leia o guia de postagem (<a shape="rect" href="http://www.leg.ufpr.br/r-br-guia" target="_blank">http://www.leg.ufpr.br/r-br-guia</a>) e fornea cdigo mnimo reproduzvel.</div></div> </div> </blockquote>