Compreendo. Tente este: library(xlsReadWrite)write.xls(mydata, "c:/mydata.xls") De: http://www.statmethods.net/input/exportingdata.html --- Atenciosamente,Raphael Saldanha [email protected]
Date: Sun, 23 Jun 2013 16:49:28 -0300 From: [email protected] To: [email protected] 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 <[email protected]> escreveu: Você pode salvar como CSV. O Excel costuma reconhecer e abrir o arquivo sem problemas: ?write.csv2 --- Atenciosamente, Raphael Saldanha [email protected] Date: Sun, 23 Jun 2013 16:12:27 -0300 From: [email protected] To: [email protected] 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" <[email protected]> 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 <[email protected]> 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" <[email protected]> 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 <[email protected]> escreveu: Obrigado Deu tudo certinho! Abraços Em 23 de junho de 2013 01:28, Benilton Carvalho <[email protected]> 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" <[email protected]> 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 [email protected] https://listas.inf.ufpr.br/cgi-bin/mailman/listinfo/r-br Leia o guia de postagem (http://www.leg.ufpr.br/r-br-guia) e forneça código mínimo reproduzível. _______________________________________________ R-br mailing list [email protected] https://listas.inf.ufpr.br/cgi-bin/mailman/listinfo/r-br Leia o guia de postagem (http://www.leg.ufpr.br/r-br-guia) e forneça código mínimo reproduzível. -- 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 -- 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 [email protected] https://listas.inf.ufpr.br/cgi-bin/mailman/listinfo/r-br Leia o guia de postagem (http://www.leg.ufpr.br/r-br-guia) e forneça código mínimo reproduzível. _______________________________________________ R-br mailing list [email protected] https://listas.inf.ufpr.br/cgi-bin/mailman/listinfo/r-br Leia o guia de postagem (http://www.leg.ufpr.br/r-br-guia) e forneça código mínimo reproduzível. -- 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 [email protected] https://listas.inf.ufpr.br/cgi-bin/mailman/listinfo/r-br Leia o guia de postagem (http://www.leg.ufpr.br/r-br-guia) e forneça código mínimo reproduzível. _______________________________________________ R-br mailing list [email protected] https://listas.inf.ufpr.br/cgi-bin/mailman/listinfo/r-br Leia o guia de postagem (http://www.leg.ufpr.br/r-br-guia) e forne�a c�digo m�nimo reproduz�vel. _______________________________________________ R-br mailing list [email protected] https://listas.inf.ufpr.br/cgi-bin/mailman/listinfo/r-br Leia o guia de postagem (http://www.leg.ufpr.br/r-br-guia) e forneça código mínimo reproduzível. -- 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 [email protected] https://listas.inf.ufpr.br/cgi-bin/mailman/listinfo/r-br Leia o guia de postagem (http://www.leg.ufpr.br/r-br-guia) e forne�a c�digo m�nimo reproduz�vel.
_______________________________________________ R-br mailing list [email protected] https://listas.inf.ufpr.br/cgi-bin/mailman/listinfo/r-br Leia o guia de postagem (http://www.leg.ufpr.br/r-br-guia) e forneça código mínimo reproduzível.
