#abrindo seus dados como exemplo<br><br>exemplo<-structure(list(nu_notific = structure(c(9L, 1L, 13L, 16L, 4L,<br>5L, 2L, 14L, 11L, 3L), .Label = c("0010777", "0014623", "0036055",<br>"0180019", "0180280", "0180567", "0180573", "0181106", "0181303",<br>
"0841583", "1634645", "1778689", "2082159", "2082161", "2087955",<br>"9138695"), class = "factor"), tp_not = structure(c(2L, 2L, 2L,<br>2L, 2L, 1L, 2L, 2L, 2L, 2L), .Label = c(" ", "2"), class = "factor"),<br>
id_agravo = structure(c(2L, 2L, 2L, 2L, 2L, 2L, 2L, 1L, 2L,<br> 2L), .Label = c(" ", "A309"), class = "factor"), dt_notific = c(13470537600,<br> 13429670400, 13452307200, 13456713600, 13455417600, 13457232000,<br>
13457145600, 13455504000, 13460342400, 13459046400), nu_ano = structure(c(1L,<br> 2L, 3L, 3L, 3L, 3L, 3L, 1L, 3L, 3L), .Label = c(" ", "2008",<br> "2009"), class = "factor"), sg_uf_not = structure(c(27L,<br>
25L, 22L, 2L, 27L, 27L, 5L, 22L, 22L, 5L), .Label = c("Ignorado/exterior",<br> "Rondônia", "Acre", "Amazonas", "Roraima", "Pará", "Amapá",<br> "Tocantins", "Maranhão", "Piauí", "Ceará", "Rio Grande do Norte",<br>
"Paraíba", "Pernambuco", "Alagoas", "Sergipe", "Bahia", "Minas Gerais",<br> "Espírito Santo", "Rio de Janeiro", "São Paulo", "Paraná",<br>
"Santa Catarina", "Rio Grande do Sul", "Mato Grosso do Sul",<br> "Mato Grosso", "Goiás", "Distrito Federal"), class = "factor"),<br> id_municip = structure(c(6L, 5L, 3L, 1L, 6L, 6L, 2L, 3L,<br>
4L, 2L), .Label = c("110004 ", "140010 ", "410830 ", "410880 ",<br> "500320 ", "520870 "), class = "factor"), id_regiona = structure(c(5L,<br> 6L, 2L, 4L, 5L, 5L, 1L, 2L, 3L, 1L), .Label = c(" ",<br>
"1363 ", "1374 ", "1480 ", "1779 ", "1974 "<br> ), class = "factor")), .Names = c("nu_notific", "tp_not",<br>"id_agravo", "dt_notific", "nu_ano", "sg_uf_not", "id_municip",<br>
"id_regiona"), variable.labels = structure(c("Número da notificação",<br>"", "", "Definições para Ano, Mes, Semana e Trimestre da Notificação",<br>"Ano da notificação", "Estado em que foi notificado o caso",<br>
"", "Definicoes para Regionais de Notificaçao"), .Names = c("nu_notific",<br>"tp_not", "id_agravo", "dt_notific", "nu_ano", "sg_uf_not", "id_municip",<br>
"id_regiona")), codepage = 1252L, row.names = c(NA, 10L), class = "data.frame")<br><br>#aqui é um caso que vc quer mudar certo?<br>exemplo[8,3]<br>str(exemplo)<br>#um fator<br><br>#usando o mesmo comando que acabamos de usar vc ve que nesse caso o vaziu é 4 espaço<br>
dput(exemplo[8,3])<br><br>#dai vc substitui<br><br>exemplo[]<-lapply(exemplo,function(x){replace(x, x == " ", NA)})<br><br>#assim vc subtitui nada de 4 espaços por NA<br>exemplo[8,3]<br><br>#so cuidado com as implicações de fazer isso para futuro uso dos dados<br>
#e não sei se ficou muito generico a solução, mas é um jeito<br><br><div class="gmail_quote">Em 13 de abril de 2012 15:53, Sérgio Henrique almeida da silva ju <span dir="ltr"><<a href="mailto:sergio.edfisica@gmail.com">sergio.edfisica@gmail.com</a>></span> escreveu:<br>
<blockquote class="gmail_quote" style="margin:0 0 0 .8ex;border-left:1px #ccc solid;padding-left:1ex">Oi<div><br></div><div>Reduzi o banco e rodei o comando:</div><div><br></div><div><div class="im"><div>exemplo<-dput(dados[1:10,])</div>
</div><div>structure(list(nu_notific = structure(c(9L, 1L, 13L, 16L, 4L, </div><div>5L, 2L, 14L, 11L, 3L), .Label = c("0010777", "0014623", "0036055", </div>
<div>"0180019", "0180280", "0180567", "0180573", "0181106", "0181303", </div><div>"0841583", "1634645", "1778689", "2082159", "2082161", "2087955", </div>
<div>"9138695"), class = "factor"), tp_not = structure(c(2L, 2L, 2L, </div><div>2L, 2L, 1L, 2L, 2L, 2L, 2L), .Label = c(" ", "2"), class = "factor"), </div><div> id_agravo = structure(c(2L, 2L, 2L, 2L, 2L, 2L, 2L, 1L, 2L, </div>
<div> 2L), .Label = c(" ", "A309"), class = "factor"), dt_notific = c(13470537600, </div><div> 13429670400, 13452307200, 13456713600, 13455417600, 13457232000, </div><div> 13457145600, 13455504000, 13460342400, 13459046400), nu_ano = structure(c(1L, </div>
<div> 2L, 3L, 3L, 3L, 3L, 3L, 1L, 3L, 3L), .Label = c(" ", "2008", </div><div> "2009"), class = "factor"), sg_uf_not = structure(c(27L, </div><div> 25L, 22L, 2L, 27L, 27L, 5L, 22L, 22L, 5L), .Label = c("Ignorado/exterior", </div>
<div> "Rondônia", "Acre", "Amazonas", "Roraima", "Pará", "Amapá", </div><div> "Tocantins", "Maranhão", "Piauí", "Ceará", "Rio Grande do Norte", </div>
<div> "Paraíba", "Pernambuco", "Alagoas", "Sergipe", "Bahia", "Minas Gerais", </div><div> "Espírito Santo", "Rio de Janeiro", "São Paulo", "Paraná", </div>
<div> "Santa Catarina", "Rio Grande do Sul", "Mato Grosso do Sul", </div><div> "Mato Grosso", "Goiás", "Distrito Federal"), class = "factor"), </div>
<div> id_municip = structure(c(6L, 5L, 3L, 1L, 6L, 6L, 2L, 3L, </div><div> 4L, 2L), .Label = c("110004 ", "140010 ", "410830 ", "410880 ", </div><div> "500320 ", "520870 "), class = "factor"), id_regiona = structure(c(5L, </div>
<div> 6L, 2L, 4L, 5L, 5L, 1L, 2L, 3L, 1L), .Label = c(" ", </div><div> "1363 ", "1374 ", "1480 ", "1779 ", "1974 "</div><div> ), class = "factor")), .Names = c("nu_notific", "tp_not", </div>
<div>"id_agravo", "dt_notific", "nu_ano", "sg_uf_not", "id_municip", </div><div>"id_regiona"), variable.labels = structure(c("Número da notificação", </div>
<div>"", "", "Definições para Ano, Mes, Semana e Trimestre da Notificação", </div><div>"Ano da notificação", "Estado em que foi notificado o caso", </div><div>"", "Definicoes para Regionais de Notificaçao"), .Names = c("nu_notific", </div>
<div>"tp_not", "id_agravo", "dt_notific", "nu_ano", "sg_uf_not", "id_municip", </div><div>"id_regiona")), codepage = 1252L, row.names = c(NA, 10L), class = "data.frame")</div>
<div><br></div><br><div class="gmail_quote">Em 13 de abril de 2012 16:47, Augusto Ribas <span dir="ltr"><<a href="mailto:ribas.aca@gmail.com" target="_blank">ribas.aca@gmail.com</a>></span> escreveu:<div><div class="h5">
<br><blockquote class="gmail_quote" style="margin:0 0 0 .8ex;border-left:1px #ccc solid;padding-left:1ex">
Cara.<br>Depois que vc fez:<br><div><br></div><div>library(foreign)</div><div><div>dados <- read.spss("tmp.sav", use.value.labels=TRUE, max.value.labels=Inf, to.data.frame=TRUE)<br><br></div>#faça o seguinte<br>
exemplo<-dput(dados)<br>
<br><br>#se o arquivo for muito gigante faz o dput de um pedaçinho so, so garanta que no pedacinho vc mostre esses brancos que ta falando tipo:<br><br>exemplo<-dput(dados[1:10,])<br><br>#ai mostra so as primeiras 10 linhas<br>
# ou faz um exemplo de dados pequenininho no systat abre no R e usa o dput<br><br>#A questão é, desse jeito todos poderam ver o que vc ve e te ajudar mais eficientemente.<br></div><br><br><div class="gmail_quote">Em 13 de abril de 2012 15:38, Sérgio Henrique almeida da silva ju <span dir="ltr"><<a href="mailto:sergio.edfisica@gmail.com" target="_blank">sergio.edfisica@gmail.com</a>></span> escreveu:<div>
<div><br>
<blockquote class="gmail_quote" style="margin:0 0 0 .8ex;border-left:1px #ccc solid;padding-left:1ex">No arquivo original algumas variáveis estão em branco e eu quero considerar isso como NA, na importação algumas variáveis automaticamente o em branco ficam NA, porém em outras os dados continuam em branco.<div>
Desculpe, mas não sei fazer um CMR com dados em branco.</div>
<div><br></div><div>Abraços</div><div><br></div><div><br><div class="gmail_quote">Em 13 de abril de 2012 16:26, Walmes Zeviani <span dir="ltr"><<a href="mailto:walmeszeviani@gmail.com" target="_blank">walmeszeviani@gmail.com</a>></span> escreveu:<br>
<blockquote class="gmail_quote" style="margin:0 0 0 .8ex;border-left:1px #ccc solid;padding-left:1ex"><div><div><div><font face="trebuchet ms,sans-serif">No arquivo de origem qual o caracter representador de NA, é ponto, é espaço, é "missing", é asterisco? Passe para o argumento na.strig= (ou similar a este na função de leitura que você usa) o caratere correspondente. Se não resolver providencie um CMR.</font></div>
<font face="trebuchet ms,sans-serif"><div><font face="trebuchet ms,sans-serif"><br></font></div><div><font face="trebuchet ms,sans-serif">À disposição.</font></div><span><font color="#888888"><div><font face="trebuchet ms,sans-serif">Walmes.</font></div>
<br clear="all"></font></span></font><div><div><span style="font-family:trebuchet ms,sans-serif">==========================================================================</span><br style="font-family:trebuchet ms,sans-serif">
<span style="font-family:trebuchet ms,sans-serif">Walmes Marques Zeviani</span><br style="font-family:trebuchet ms,sans-serif">
<span style="font-family:trebuchet ms,sans-serif">LEG (Laboratório de Estatística e Geoinformação, 25.450418 S, 49.231759 W)</span><br style="font-family:trebuchet ms,sans-serif"><span style="font-family:trebuchet ms,sans-serif">Departamento de Estatística - Universidade Federal do Paraná</span><br style="font-family:trebuchet ms,sans-serif">
<span style="font-family:trebuchet ms,sans-serif">fone: <a href="tel:%28%2B55%29%2041%203361%203573" value="+554133613573" target="_blank">(+55) 41 3361 3573</a></span><br style="font-family:trebuchet ms,sans-serif"><span style="font-family:trebuchet ms,sans-serif">VoIP: (3361 3600) 1053 1173</span><br style="font-family:trebuchet ms,sans-serif">
<span style="font-family:trebuchet ms,sans-serif">e-mail: <a href="mailto:walmes@ufpr.br" target="_blank">walmes@ufpr.br</a></span><br style="font-family:trebuchet ms,sans-serif"><span style="font-family:trebuchet ms,sans-serif">twitter: @walmeszeviani</span><br style="font-family:trebuchet ms,sans-serif">
<span style="font-family:trebuchet ms,sans-serif">homepage: <a href="http://www.leg.ufpr.br/%7Ewalmes" target="_blank">http://www.leg.ufpr.br/~walmes</a></span><br style="font-family:trebuchet ms,sans-serif"><span style="font-family:trebuchet ms,sans-serif">linux user number: 531218</span><br style="font-family:trebuchet ms,sans-serif">
<span style="font-family:trebuchet ms,sans-serif">==========================================================================</span><br>
</div></div><br></div></div><div>_______________________________________________<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/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-guia</a>) e forneça código mínimo reproduzível.<br></div></blockquote></div><div><br><br clear="all">
<div><br></div>-- <br>
Sérgio Henrique Almeida da Silva Junior<br>Doutorando em Epidemiologia em Saúde Pública<br>Escola Nacional de Saúde Pública Sérgio Arouca - ENSP/FIOCRUZ<br><a href="http://lattes.cnpq.br/1611345552843383" target="_blank">http://lattes.cnpq.br/1611345552843383</a> <br>
Tel: (21) 94429486/78101651 id: 123*20942<br><br><br>
</div></div>
<br>_______________________________________________<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/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-guia</a>) e forneça código mínimo reproduzível.<br></blockquote></div></div></div><br><br clear="all"><br>-- <br>
<div><div><div>Grato<br>
Augusto C. A. Ribas</div>
<div> </div>
<div>Site Pessoal: <a href="http://augustoribas.heliohost.org" target="_blank">http://augustoribas.heliohost.org</a></div>
<div>Lattes: <a href="http://lattes.cnpq.br/7355685961127056" target="_blank">http://lattes.cnpq.br/7355685961127056</a><br></div><br>
</div></div><br>_______________________________________________<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/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-guia</a>) e forneça código mínimo reproduzível.<br></blockquote></div></div></div><div><div class="h5"><br><br clear="all">
<div><br></div>-- <br>
Sérgio Henrique Almeida da Silva Junior<br>Doutorando em Epidemiologia em Saúde Pública<br>Escola Nacional de Saúde Pública Sérgio Arouca - ENSP/FIOCRUZ<br><a href="http://lattes.cnpq.br/1611345552843383" target="_blank">http://lattes.cnpq.br/1611345552843383</a> <br>
Tel: (21) 94429486/78101651 id: 123*20942<br><br><br>
</div></div></div>
<br>_______________________________________________<br>
R-br mailing list<br>
<a href="mailto:R-br@listas.c3sl.ufpr.br">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/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-guia</a>) e forneça código mínimo reproduzível.<br></blockquote></div><br><br clear="all"><br>-- <br><div>Grato<br>
Augusto C. A. Ribas</div>
<div> </div>
<div>Site Pessoal: <a href="http://augustoribas.heliohost.org" target="_blank">http://augustoribas.heliohost.org</a></div>
<div>Lattes: <a href="http://lattes.cnpq.br/7355685961127056" target="_blank">http://lattes.cnpq.br/7355685961127056</a><br></div><br>