
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

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 Leia o guia de postagem (http://www.leg.ufpr.br/r-br-guia) e forneça código mínimo reproduzível.

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 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 R-br@listas.c3sl.ufpr.br 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ó 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 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 R-br@listas.c3sl.ufpr.br 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

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 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 R-br@listas.c3sl.ufpr.br 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 R-br@listas.c3sl.ufpr.br 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.

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 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 R-br@listas.c3sl.ufpr.br 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 R-br@listas.c3sl.ufpr.br 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 R-br@listas.c3sl.ufpr.br 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

Benilton você tem alguma sugestão? Abraços Em 23 de junho de 2013 14:41, Sérgio Henrique almeida da silva ju < sergio.edfisica@gmail.com> escreveu:
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 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 R-br@listas.c3sl.ufpr.br 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 R-br@listas.c3sl.ufpr.br 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 R-br@listas.c3sl.ufpr.br 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

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 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 R-br@listas.c3sl.ufpr.br 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 R-br@listas.c3sl.ufpr.br 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 R-br@listas.c3sl.ufpr.br 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 R-br@listas.c3sl.ufpr.br 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.

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 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 R-br@listas.c3sl.ufpr.br 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 R-br@listas.c3sl.ufpr.br 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 R-br@listas.c3sl.ufpr.br 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 R-br@listas.c3sl.ufpr.br 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 R-br@listas.c3sl.ufpr.br 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.

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@outlook.com>escreveu:
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 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 R-br@listas.c3sl.ufpr.br 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 R-br@listas.c3sl.ufpr.br 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 R-br@listas.c3sl.ufpr.br 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 R-br@listas.c3sl.ufpr.br 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 R-br@listas.c3sl.ufpr.br 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 R-br@listas.c3sl.ufpr.br 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

Compreendo. Tente este: library(xlsReadWrite)write.xls(mydata, "c:/mydata.xls") De: http://www.statmethods.net/input/exportingdata.html --- Atenciosamente,Raphael Saldanha rfsaldanha@outlook.com Date: Sun, 23 Jun 2013 16:49:28 -0300 From: sergio.edfisica@gmail.com To: r-br@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@outlook.com> escreveu: 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 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 R-br@listas.c3sl.ufpr.br 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 R-br@listas.c3sl.ufpr.br 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 R-br@listas.c3sl.ufpr.br 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 R-br@listas.c3sl.ufpr.br 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 R-br@listas.c3sl.ufpr.br 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 R-br@listas.c3sl.ufpr.br 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 R-br@listas.c3sl.ufpr.br 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.

Essa biblioteca não está mais disponível! :-( Em 23 de junho de 2013 17:28, Raphael Saldanha <rfsaldanha@outlook.com>escreveu:
Compreendo.
Tente este:
library(xlsReadWrite) write.xls(mydata, "c:/mydata.xls")
De: http://www.statmethods.net/input/exportingdata.html
---
Atenciosamente, Raphael Saldanha
rfsaldanha@outlook.com
------------------------------ Date: Sun, 23 Jun 2013 16:49:28 -0300 From: sergio.edfisica@gmail.com
To: r-br@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@outlook.com>escreveu:
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 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 R-br@listas.c3sl.ufpr.br 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 R-br@listas.c3sl.ufpr.br 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 R-br@listas.c3sl.ufpr.br 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 R-br@listas.c3sl.ufpr.br 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 R-br@listas.c3sl.ufpr.br 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 R-br@listas.c3sl.ufpr.br 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 R-br@listas.c3sl.ufpr.br 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 R-br@listas.c3sl.ufpr.br 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

Resolvi usando a biblioteca xlsx for (nm in Nms) write.xlsx(Res[[nm]], paste(nm, 'xls', sep='.'),sheetName=paste(nm), col.names=TRUE) Porém isso cria nos meus bancos de dados uma variável com o nome em branco que é a a posição da linha; Ex,: codigo sexo idade 1 10001 m 19 2 10001 m 19 3 10001 m 20 4 10001 m 20 Como ignorar isso, para que a variável não seja criada no meu banco? Abraços Em 23 de junho de 2013 17:30, Sérgio Henrique almeida da silva ju < sergio.edfisica@gmail.com> escreveu:
Essa biblioteca não está mais disponível! :-(
Em 23 de junho de 2013 17:28, Raphael Saldanha <rfsaldanha@outlook.com>escreveu:
Compreendo.
Tente este:
library(xlsReadWrite) write.xls(mydata, "c:/mydata.xls")
De: http://www.statmethods.net/input/exportingdata.html
---
Atenciosamente, Raphael Saldanha
rfsaldanha@outlook.com
------------------------------ Date: Sun, 23 Jun 2013 16:49:28 -0300 From: sergio.edfisica@gmail.com
To: r-br@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@outlook.com>escreveu:
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 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 R-br@listas.c3sl.ufpr.br 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 R-br@listas.c3sl.ufpr.br 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 R-br@listas.c3sl.ufpr.br 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 R-br@listas.c3sl.ufpr.br 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 R-br@listas.c3sl.ufpr.br 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 R-br@listas.c3sl.ufpr.br 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 R-br@listas.c3sl.ufpr.br 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 R-br@listas.c3sl.ufpr.br 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

André, Uma busca no google, página 37: http://cran.r-project.org/web/packages/xlsx/xlsx.pdf att, FH 2013/6/23 Sérgio Henrique almeida da silva ju <sergio.edfisica@gmail.com>
Resolvi usando a biblioteca xlsx
for (nm in Nms) write.xlsx(Res[[nm]], paste(nm, 'xls', sep='.'),sheetName=paste(nm), col.names=TRUE)
Porém isso cria nos meus bancos de dados uma variável com o nome em branco que é a a posição da linha; Ex,:
codigo sexo idade 1 10001 m 19 2 10001 m 19 3 10001 m 20 4 10001 m 20 Como ignorar isso, para que a variável não seja criada no meu banco?
Abraços
Em 23 de junho de 2013 17:30, Sérgio Henrique almeida da silva ju < sergio.edfisica@gmail.com> escreveu:
Essa biblioteca não está mais disponível! :-(
Em 23 de junho de 2013 17:28, Raphael Saldanha <rfsaldanha@outlook.com>escreveu:
Compreendo.
Tente este:
library(xlsReadWrite) write.xls(mydata, "c:/mydata.xls")
De: http://www.statmethods.net/input/exportingdata.html
---
Atenciosamente, Raphael Saldanha
rfsaldanha@outlook.com
------------------------------ Date: Sun, 23 Jun 2013 16:49:28 -0300 From: sergio.edfisica@gmail.com
To: r-br@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@outlook.com>escreveu:
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 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 R-br@listas.c3sl.ufpr.br 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 R-br@listas.c3sl.ufpr.br 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 R-br@listas.c3sl.ufpr.br 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 R-br@listas.c3sl.ufpr.br 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 R-br@listas.c3sl.ufpr.br 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 R-br@listas.c3sl.ufpr.br 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 R-br@listas.c3sl.ufpr.br 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 R-br@listas.c3sl.ufpr.br 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 R-br@listas.c3sl.ufpr.br 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.

Fernando Não entendi! Qual comando eu uso pra ignorar? Não achei Em 23 de junho de 2013 20:04, FHRB Toledo <fernandohtoledo@gmail.com>escreveu:
André,
Uma busca no google, página 37: http://cran.r-project.org/web/packages/xlsx/xlsx.pdf
att, FH
2013/6/23 Sérgio Henrique almeida da silva ju <sergio.edfisica@gmail.com>
Resolvi usando a biblioteca xlsx
for (nm in Nms) write.xlsx(Res[[nm]], paste(nm, 'xls', sep='.'),sheetName=paste(nm), col.names=TRUE)
Porém isso cria nos meus bancos de dados uma variável com o nome em branco que é a a posição da linha; Ex,:
codigo sexo idade 1 10001 m 19 2 10001 m 19 3 10001 m 20 4 10001 m 20 Como ignorar isso, para que a variável não seja criada no meu banco?
Abraços
Em 23 de junho de 2013 17:30, Sérgio Henrique almeida da silva ju < sergio.edfisica@gmail.com> escreveu:
Essa biblioteca não está mais disponível! :-(
Em 23 de junho de 2013 17:28, Raphael Saldanha <rfsaldanha@outlook.com>escreveu:
Compreendo.
Tente este:
library(xlsReadWrite) write.xls(mydata, "c:/mydata.xls")
De: http://www.statmethods.net/input/exportingdata.html
---
Atenciosamente, Raphael Saldanha
rfsaldanha@outlook.com
------------------------------ Date: Sun, 23 Jun 2013 16:49:28 -0300 From: sergio.edfisica@gmail.com
To: r-br@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@outlook.com>escreveu:
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 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 R-br@listas.c3sl.ufpr.br 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 R-br@listas.c3sl.ufpr.br 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 R-br@listas.c3sl.ufpr.br 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 R-br@listas.c3sl.ufpr.br 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 R-br@listas.c3sl.ufpr.br 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 R-br@listas.c3sl.ufpr.br 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 R-br@listas.c3sl.ufpr.br 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 R-br@listas.c3sl.ufpr.br 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 R-br@listas.c3sl.ufpr.br 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 R-br@listas.c3sl.ufpr.br 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

row.names a logical value indicating whether the row names of x are to be written along with x to the file Colocando row.names = FALSE você resolve seu problema! att, FH 2013/6/23 Sérgio Henrique almeida da silva ju <sergio.edfisica@gmail.com>
Fernando
Não entendi! Qual comando eu uso pra ignorar? Não achei
Em 23 de junho de 2013 20:04, FHRB Toledo <fernandohtoledo@gmail.com>escreveu:
André,
Uma busca no google, página 37: http://cran.r-project.org/web/packages/xlsx/xlsx.pdf
att, FH
2013/6/23 Sérgio Henrique almeida da silva ju <sergio.edfisica@gmail.com>
Resolvi usando a biblioteca xlsx
for (nm in Nms) write.xlsx(Res[[nm]], paste(nm, 'xls', sep='.'),sheetName=paste(nm), col.names=TRUE)
Porém isso cria nos meus bancos de dados uma variável com o nome em branco que é a a posição da linha; Ex,:
codigo sexo idade 1 10001 m 19 2 10001 m 19 3 10001 m 20 4 10001 m 20 Como ignorar isso, para que a variável não seja criada no meu banco?
Abraços
Em 23 de junho de 2013 17:30, Sérgio Henrique almeida da silva ju < sergio.edfisica@gmail.com> escreveu:
Essa biblioteca não está mais disponível! :-(
Em 23 de junho de 2013 17:28, Raphael Saldanha <rfsaldanha@outlook.com>escreveu:
Compreendo.
Tente este:
library(xlsReadWrite) write.xls(mydata, "c:/mydata.xls")
De: http://www.statmethods.net/input/exportingdata.html
---
Atenciosamente, Raphael Saldanha
rfsaldanha@outlook.com
------------------------------ Date: Sun, 23 Jun 2013 16:49:28 -0300 From: sergio.edfisica@gmail.com
To: r-br@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@outlook.com
escreveu:
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 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 R-br@listas.c3sl.ufpr.br 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 R-br@listas.c3sl.ufpr.br 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 R-br@listas.c3sl.ufpr.br 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 R-br@listas.c3sl.ufpr.br 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 R-br@listas.c3sl.ufpr.br 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 R-br@listas.c3sl.ufpr.br 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 R-br@listas.c3sl.ufpr.br 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 R-br@listas.c3sl.ufpr.br 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 R-br@listas.c3sl.ufpr.br 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 R-br@listas.c3sl.ufpr.br 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 R-br@listas.c3sl.ufpr.br 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.

Valeu amigo! Eu tinha colocado TRUE. Abraços Em 23 de junho de 2013 20:16, FHRB Toledo <fernandohtoledo@gmail.com>escreveu:
row.names a logical value indicating whether the row names of x are to be written along with x to the file
Colocando row.names = FALSE você resolve seu problema!
att, FH
2013/6/23 Sérgio Henrique almeida da silva ju <sergio.edfisica@gmail.com>
Fernando
Não entendi! Qual comando eu uso pra ignorar? Não achei
Em 23 de junho de 2013 20:04, FHRB Toledo <fernandohtoledo@gmail.com>escreveu:
André,
Uma busca no google, página 37: http://cran.r-project.org/web/packages/xlsx/xlsx.pdf
att, FH
2013/6/23 Sérgio Henrique almeida da silva ju <sergio.edfisica@gmail.com
Resolvi usando a biblioteca xlsx
for (nm in Nms) write.xlsx(Res[[nm]], paste(nm, 'xls', sep='.'),sheetName=paste(nm), col.names=TRUE)
Porém isso cria nos meus bancos de dados uma variável com o nome em branco que é a a posição da linha; Ex,:
codigo sexo idade 1 10001 m 19 2 10001 m 19 3 10001 m 20 4 10001 m 20 Como ignorar isso, para que a variável não seja criada no meu banco?
Abraços
Em 23 de junho de 2013 17:30, Sérgio Henrique almeida da silva ju < sergio.edfisica@gmail.com> escreveu:
Essa biblioteca não está mais disponível! :-(
Em 23 de junho de 2013 17:28, Raphael Saldanha <rfsaldanha@outlook.com
escreveu:
Compreendo.
Tente este:
library(xlsReadWrite) write.xls(mydata, "c:/mydata.xls")
De: http://www.statmethods.net/input/exportingdata.html
---
Atenciosamente, Raphael Saldanha
rfsaldanha@outlook.com
------------------------------ Date: Sun, 23 Jun 2013 16:49:28 -0300 From: sergio.edfisica@gmail.com
To: r-br@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@outlook.com> escreveu:
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 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 R-br@listas.c3sl.ufpr.br 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 R-br@listas.c3sl.ufpr.br 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 R-br@listas.c3sl.ufpr.br 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 R-br@listas.c3sl.ufpr.br 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 R-br@listas.c3sl.ufpr.br 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 R-br@listas.c3sl.ufpr.br 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 R-br@listas.c3sl.ufpr.br 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 R-br@listas.c3sl.ufpr.br 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 R-br@listas.c3sl.ufpr.br 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 R-br@listas.c3sl.ufpr.br 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 R-br@listas.c3sl.ufpr.br 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 R-br@listas.c3sl.ufpr.br 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
participantes (5)
-
Benilton Carvalho
-
ctrucios
-
FHRB Toledo
-
Raphael Saldanha
-
Sérgio Henrique almeida da silva ju