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

Domingo Junho 23 17:28:10 BRT 2013

Compreendo.
Tente este:
library(xlsReadWrite)write.xls(mydata, "c:/mydata.xls")
De: http://www.statmethods.net/input/exportingdata.html
---
Atenciosamente,Raphael Saldanha
rfsaldanha em outlook.com

Date: Sun, 23 Jun 2013 16:49:28 -0300
From: sergio.edfisica em gmail.com
To: r-br em listas.c3sl.ufpr.br
Subject: Re: [R-br] Selecionar casos - Função

o problema é que estes arquivos devem ser salvos dentro de arquivos zip com formato xls, a empresa deseja usa diretamente esses arquivos, não sei o motivo... para evitar todo trabalho manual eu estou tentando fazer isso diretamente pelo R.

Em 23 de junho de 2013 16:45, Raphael Saldanha <rfsaldanha em outlook.com> escreveu:

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

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

Date: Sun, 23 Jun 2013 16:12:27 -0300
From: beniltoncarvalho em gmail.com

To: r-br em 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 em 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 em 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 em 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 em gmail.com> escreveu:

Obrigado
Deu tudo certinho!
Abraços

Em 23 de junho de 2013 01:28, Benilton Carvalho <beniltoncarvalho em 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 em 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 em listas.c3sl.ufpr.br

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