Re: [R-br] Selecionar casos - Função

23 Jun 2013

      Você pode salvar como CSV. O Excel costuma reconhecer e abrir o arquivo sem problemas:
?write.csv2

---
Atenciosamente,Raphael Saldanha
rfsaldanha@outlook.com

Date: Sun, 23 Jun 2013 16:12:27 -0300
From: beniltoncarvalho@gmail.com
To: r-br@listas.c3sl.ufpr.br
Subject: Re: [R-br] Selecionar casos - Função

Você terá de esperar a ajuda de alguém que use Excel... Salvar como texto, como indiquei, não te impede de abrir no Excel... 
On 23 Jun 2013 14:41, "Sérgio Henrique almeida da silva ju" <sergio.edfisica@gmail.com> wrote:

Obrigado amigo
Mas nesse caso surge um problema em dados como fatores, por exemplo, no meu caso ele cria um \m\ ou \f\, como resolver isso?

Em 23 de junho de 2013 14:35, ctrucios <ctrucios@gmail.com> escreveu:

Oi, eu utilizou a função write.table. Aqui um exemplo

write.table(TC95,"TC95.xls", sep="\t",col.names=TRUE, row.names=FALSE, quote=TRUE, na="NA")
Em 23/06/2013 14:31, "Sérgio Henrique almeida da silva ju" <sergio.edfisica@gmail.com> escreveu:

Só mais uma pergunta
Como posso salvar esses arquivos em excel?Eu tentei o comando da biblioteca WriteXLS, mas não rodou
for (nm in Nms) WriteXLS(Res[[nm]], ExcelFileName = paste(nm, 'xls', sep='.'))

tem algum jeito melhor de salvar?
Obrigado

Em 23 de junho de 2013 12:51, Sérgio Henrique almeida da silva ju <sergio.edfisica@gmail.com> escreveu:

Obrigado
Deu tudo certinho!
Abraços

Em 23 de junho de 2013 01:28, Benilton Carvalho <beniltoncarvalho@gmail.com> escreveu:

Para dividir em subconjuntos, use o comando split(). 
Res = split(dados,  dados$codigo) 
Daí, combine com um for() loop para gravar (ou mesmo um lapply). 
Nms = names(Res) 

for (nm in Nms) write.table(Res[[nm]], file=paste(nm, 'txt', sep='.')) 
(código não-testado) 
Sobre gravar compactado, vc pode mudar o nome do arquivo para uma conexão gzip ou, se bem me lembro, zip. Veja a ajuda para os comandos de mesmo nome. 
b
On 22 Jun 2013 23:23, "Sérgio Henrique almeida da silva ju" <sergio.edfisica@gmail.com> wrote:

Prezados
Gostaria de fazer uma função que através de um banco formasse diversos outros bancos selecionados por uma variável.
Exemplo:

codigo <- c(rep("10001",10), rep("10005",15),rep("20001",20))sexo <- c(rep("m",20),rep("f",25))idade <- rnorm(45,20)

dados <- cbind(as.data.frame(codigo),as.data.frame(sexo),as.data.frame(idade))
Quero quebrar esse banco dados em diversos outros bancos pela variável codigo
como:

dados1 <- dados[which(dados$codigo=="10001"),]
...dadosn <- dados[which(dados$codigo=="n"),]

Posso fazer uma table(codigo) e jogar os valores dentro desse comando, mas não sei como fazer isso, deixando a função mais automática.

Outra pergunta tem como eu saber esses bancos comprimidos através do R, por exemplo em ZIP ou RAR? 
Obrigado-- 
Sérgio Henrique Almeida da Silva Junior

Doutorando em Epidemiologia em Saúde Pública
Escola Nacional de Saúde Pública Sérgio Arouca - ENSP/FIOCRUZ
http://lattes.cnpq.br/1611345552843383 

Tel: (21) 68463637
http://www.linkedin.com/profile/view?id=250437145&trk=tab_pro

_______________________________________________

R-br mailing list

R-br@listas.c3sl.ufpr.br

https://listas.inf.ufpr.br/cgi-bin/mailman/listinfo/r-br