
Bom dia caros amigos, tenho um pequeno problema que ainda não consegui encontrar a solução. É o seguinte: Estou aplicando um questionário para avaliar a satisfação do cliente em um hospital público. Na avaliação dos clientes estou usando uma escala de likert com as respostas para algumas questões. ótimo, bom, regular, ruim, péssimo e não utilizou o serviço Gostaria de fazer uma mudança nessas respostas usando uma rotina do R. Gostaria de mudar da seguinte forma para todo o banco de uma única vez. otimo e bom receberia o label "positiva" regular e não utilizou o serviço o label " "e ruim e péssimo receberia o label "negativa". Alguém tem alguma sugestão? Bom diae muito obrigado!!! Prof. Edson Lira, Me Estatístico Manaus-Amazonas

Já resolvi, com a rotina abaixo. ads <- apply(ads, 2, function(x) {x <- recode(x,"'pessimo'='Negativa'; 'ruim'='Negativa'; 'otimo'='Positiva';'bom'='Positiva';'nao utilizou o servico'='';'regular'=''"); x}) Se alguém tiver uma solução mais elegante, eu gostaria de saber. Bom dia a todos! [ ]'s. Prof. Edson Lira, Me Estatístico Manaus-Amazonas Em Quarta-feira, 31 de Janeiro de 2018 9:45, Edson Lira via R-br <r-br@listas.c3sl.ufpr.br> escreveu: Bom dia caros amigos, tenho um pequeno problema que ainda não consegui encontrar a solução. É o seguinte: Estou aplicando um questionário para avaliar a satisfação do cliente em um hospital público. Na avaliação dos clientes estou usando uma escala de likert com as respostas para algumas questões. ótimo, bom, regular, ruim, péssimo e não utilizou o serviço Gostaria de fazer uma mudança nessas respostas usando uma rotina do R. Gostaria de mudar da seguinte forma para todo o banco de uma única vez. otimo e bom receberia o label "positiva" regular e não utilizou o serviço o label " "e ruim e péssimo receberia o label "negativa". Alguém tem alguma sugestão? Bom diae muito obrigado!!! Prof. Edson Lira, Me Estatístico Manaus-Amazonas_______________________________________________ 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.

Olá Você pode usar a função 'mapvalues' do pacote plyr também. No seu caso, ficaria ads <- plyr::mapvalues(ads, from = c('péssimo','ruim','otimo','bom','regular'), to = c('Negativa','Negativa','Positiva','Positiva','')) 2018-01-31 13:05 GMT-02:00 Edson Lira via R-br <r-br@listas.c3sl.ufpr.br>:
Já resolvi, com a rotina abaixo.
ads <- apply(ads, 2, function(x) {x <- recode(x,"'pessimo'='Negativa'; 'ruim'='Negativa'; 'otimo'='Positiva';'bom'='Positiva';'nao utilizou o servico'='';'regular'=''"); x})
Se alguém tiver uma solução mais elegante, eu gostaria de saber.
Bom dia a todos!
[ ]'s. Prof. Edson Lira, Me Estatístico Manaus-Amazonas
Em Quarta-feira, 31 de Janeiro de 2018 9:45, Edson Lira via R-br <r-br@listas.c3sl.ufpr.br> escreveu:
Bom dia caros amigos, tenho um pequeno problema que ainda não consegui encontrar a solução.
É o seguinte: Estou aplicando um questionário para avaliar a satisfação do cliente em um hospital público.
Na avaliação dos clientes estou usando uma escala de likert com as respostas para algumas questões.
ótimo, bom, regular, ruim, péssimo e não utilizou o serviço
Gostaria de fazer uma mudança nessas respostas usando uma rotina do R.
Gostaria de mudar da seguinte forma para todo o banco de uma única vez.
otimo e bom receberia o label "positiva" regular e não utilizou o serviço o label " " e ruim e péssimo receberia o label "negativa".
Alguém tem alguma sugestão?
Bom diae muito obrigado!!! Prof. Edson Lira, Me Estatístico Manaus-Amazonas _______________________________________________ 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.

Eu, particularmente, usaria o recode, mas jogaria em uma outra variável Leonard Em 31 de jan de 2018 1:48 PM, "Tiago Fragoso via R-br" < r-br@listas.c3sl.ufpr.br> escreveu: Olá Você pode usar a função 'mapvalues' do pacote plyr também. No seu caso, ficaria ads <- plyr::mapvalues(ads, from = c('péssimo','ruim','otimo','bom','regular'), to = c('Negativa','Negativa','Positiva','Positiva','')) 2018-01-31 13:05 GMT-02:00 Edson Lira via R-br <r-br@listas.c3sl.ufpr.br>:
Já resolvi, com a rotina abaixo.
ads <- apply(ads, 2, function(x) {x <- recode(x,"'pessimo'='Negativa'; 'ruim'='Negativa'; 'otimo'='Positiva';'bom'='Positiva';'nao utilizou o servico'='';'regular'=''"); x})
Se alguém tiver uma solução mais elegante, eu gostaria de saber.
Bom dia a todos!
[ ]'s. Prof. Edson Lira, Me Estatístico Manaus-Amazonas
Em Quarta-feira, 31 de Janeiro de 2018 9:45, Edson Lira via R-br <r-br@listas.c3sl.ufpr.br> escreveu:
Bom dia caros amigos, tenho um pequeno problema que ainda não consegui encontrar a solução.
É o seguinte: Estou aplicando um questionário para avaliar a satisfação do cliente em um hospital público.
Na avaliação dos clientes estou usando uma escala de likert com as respostas para algumas questões.
ótimo, bom, regular, ruim, péssimo e não utilizou o serviço
Gostaria de fazer uma mudança nessas respostas usando uma rotina do R.
Gostaria de mudar da seguinte forma para todo o banco de uma única vez.
otimo e bom receberia o label "positiva" regular e não utilizou o serviço o label " " e ruim e péssimo receberia o label "negativa".
Alguém tem alguma sugestão?
Bom diae muito obrigado!!! Prof. Edson Lira, Me Estatístico Manaus-Amazonas _______________________________________________ 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 fornea cdigo mnimo reproduzvel.

Obrigado Thiago e Leonard, vou testar a sugestão de vcs. [ ]'s. Prof. Edson Lira, Me Estatístico Manaus-Amazonas Em quarta-feira, 31 de janeiro de 2018 13:12:19 GMT-4, Leonard Assis via R-br <r-br@listas.c3sl.ufpr.br> escreveu: Eu, particularmente, usaria o recode, mas jogaria em uma outra variável Leonard Em 31 de jan de 2018 1:48 PM, "Tiago Fragoso via R-br" <r-br@listas.c3sl.ufpr.br> escreveu: Olá Você pode usar a função 'mapvalues' do pacote plyr também. No seu caso, ficaria ads <- plyr::mapvalues(ads, from = c('péssimo','ruim','otimo',' bom','regular'), to = c('Negativa','Negativa',' Positiva','Positiva','')) 2018-01-31 13:05 GMT-02:00 Edson Lira via R-br <r-br@listas.c3sl.ufpr.br>:
Já resolvi, com a rotina abaixo.
ads <- apply(ads, 2, function(x) {x <- recode(x,"'pessimo'='Negativa' ; 'ruim'='Negativa'; 'otimo'='Positiva';'bom'=' Positiva';'nao utilizou o servico'='';'regular'=''"); x})
Se alguém tiver uma solução mais elegante, eu gostaria de saber.
Bom dia a todos!
[ ]'s. Prof. Edson Lira, Me Estatístico Manaus-Amazonas
Em Quarta-feira, 31 de Janeiro de 2018 9:45, Edson Lira via R-br <r-br@listas.c3sl.ufpr.br> escreveu:
Bom dia caros amigos, tenho um pequeno problema que ainda não consegui encontrar a solução.
É o seguinte: Estou aplicando um questionário para avaliar a satisfação do cliente em um hospital público.
Na avaliação dos clientes estou usando uma escala de likert com as respostas para algumas questões.
ótimo, bom, regular, ruim, péssimo e não utilizou o serviço
Gostaria de fazer uma mudança nessas respostas usando uma rotina do R.
Gostaria de mudar da seguinte forma para todo o banco de uma única vez.
otimo e bom receberia o label "positiva" regular e não utilizou o serviço o label " " e ruim e péssimo receberia o label "negativa".
Alguém tem alguma sugestão?
Bom diae muito obrigado!!! Prof. Edson Lira, Me Estatístico Manaus-Amazonas ______________________________ _________________ 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 fornea cdigo mnimo reproduzvel. _______________________________________________ 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.

A função revalue do pacote plyr é ótima para isso dados <- expand.grid(Resposta=c("otimo","bom","regular","ruim","NaoUtilizou","pessimo"),Questao=1:10) head(dados) library(plyr) dados$novaclass <- revalue(dados$Resposta, c("otimo"="positiva","bom" = "positiva","regular"="","NaoUtilizou" = "","ruim" ="negativa", "pessimo" = "negativa")) Em 31 de janeiro de 2018 17:54, Edson Lira via R-br < r-br@listas.c3sl.ufpr.br> escreveu:
Obrigado Thiago e Leonard, vou testar a sugestão de vcs.
[ ]'s. Prof. Edson Lira, Me Estatístico Manaus-Amazonas
Em quarta-feira, 31 de janeiro de 2018 13:12:19 GMT-4, Leonard Assis via R-br <r-br@listas.c3sl.ufpr.br> escreveu:
Eu, particularmente, usaria o recode, mas jogaria em uma outra variável
Leonard
Em 31 de jan de 2018 1:48 PM, "Tiago Fragoso via R-br" < r-br@listas.c3sl.ufpr.br> escreveu:
Olá
Você pode usar a função 'mapvalues' do pacote plyr também. No seu caso, ficaria
ads <- plyr::mapvalues(ads, from = c('péssimo','ruim','otimo',' bom','regular'), to = c('Negativa','Negativa',' Positiva','Positiva',''))
2018-01-31 13:05 GMT-02:00 Edson Lira via R-br <r-br@listas.c3sl.ufpr.br>:
Já resolvi, com a rotina abaixo.
ads <- apply(ads, 2, function(x) {x <- recode(x,"'pessimo'='Negativa' ; 'ruim'='Negativa'; 'otimo'='Positiva';'bom'=' Positiva';'nao utilizou o servico'='';'regular'=''"); x})
Se alguém tiver uma solução mais elegante, eu gostaria de saber.
Bom dia a todos!
[ ]'s. Prof. Edson Lira, Me Estatístico Manaus-Amazonas
Em Quarta-feira, 31 de Janeiro de 2018 9:45, Edson Lira via R-br <r-br@listas.c3sl.ufpr.br> escreveu:
Bom dia caros amigos, tenho um pequeno problema que ainda não consegui encontrar a solução.
É o seguinte: Estou aplicando um questionário para avaliar a satisfação do cliente em um hospital público.
Na avaliação dos clientes estou usando uma escala de likert com as respostas para algumas questões.
ótimo, bom, regular, ruim, péssimo e não utilizou o serviço
Gostaria de fazer uma mudança nessas respostas usando uma rotina do R.
Gostaria de mudar da seguinte forma para todo o banco de uma única vez.
otimo e bom receberia o label "positiva" regular e não utilizou o serviço o label " " e ruim e péssimo receberia o label "negativa".
Alguém tem alguma sugestão?
Bom diae muito obrigado!!! Prof. Edson Lira, Me Estatístico Manaus-Amazonas ______________________________ _________________ R-br mailing list R-br@listas.c3sl.ufpr.br https://listas.inf.ufpr.br/ cgi-bin/mailman/listinfo/r-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 <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 <https://listas.inf.ufpr.br/cgi-bin/mailman/listinfo/r-br> Leia o guia de postagem (http://www.leg.ufpr.br/r-br- guia <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 <https://listas.inf.ufpr.br/cgi-bin/mailman/listinfo/r-br> Leia o guia de postagem (http://www.leg.ufpr.br/r-br- guia <http://www.leg.ufpr.br/r-br-guia>) e fornea cdigo mnimo reproduzvel.
_______________________________________________ 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.
-- ========================================= Fernando Souza Zootecnista, DSc. Produção e Alimentação Animal Celular: (31)99796-8781 (Vivo) E-mail:nandodesouza@gmail.com <e-mail%3Anandodesouza@gmail.com> Lattes: http://lattes.cnpq.br/6519538815038307 Blog: https://producaoanimalcomr.wordpress.com/ ==========================================

Valeu Fernando, outra boa sugestão a ser testada [ ]'s Prof. Edson Lira, Me Estatístico Manaus-Amazonas Em Quarta-feira, 31 de Janeiro de 2018 15:44, Fernando Souza <nandodesouza@gmail.com> escreveu: A função revalue do pacote plyr é ótima para isso dados <- expand.grid(Resposta=c("otimo","bom","regular","ruim","NaoUtilizou","pessimo"),Questao=1:10) head(dados) library(plyr) dados$novaclass <- revalue(dados$Resposta, c("otimo"="positiva","bom" = "positiva","regular"="","NaoUtilizou" = "","ruim" ="negativa", "pessimo" = "negativa")) Em 31 de janeiro de 2018 17:54, Edson Lira via R-br <r-br@listas.c3sl.ufpr.br> escreveu: Obrigado Thiago e Leonard, vou testar a sugestão de vcs. [ ]'s. Prof. Edson Lira, Me Estatístico Manaus-Amazonas Em quarta-feira, 31 de janeiro de 2018 13:12:19 GMT-4, Leonard Assis via R-br <r-br@listas.c3sl.ufpr.br> escreveu: Eu, particularmente, usaria o recode, mas jogaria em uma outra variável Leonard Em 31 de jan de 2018 1:48 PM, "Tiago Fragoso via R-br" <r-br@listas.c3sl.ufpr.br> escreveu: Olá Você pode usar a função 'mapvalues' do pacote plyr também. No seu caso, ficaria ads <- plyr::mapvalues(ads, from = c('péssimo','ruim','otimo',' bom','regular'), to = c('Negativa','Negativa',' Positiva','Positiva','')) 2018-01-31 13:05 GMT-02:00 Edson Lira via R-br <r-br@listas.c3sl.ufpr.br>:
Já resolvi, com a rotina abaixo.
ads <- apply(ads, 2, function(x) {x <- recode(x,"'pessimo'='Negativa' ; 'ruim'='Negativa'; 'otimo'='Positiva';'bom'=' Positiva';'nao utilizou o servico'='';'regular'=''"); x})
Se alguém tiver uma solução mais elegante, eu gostaria de saber.
Bom dia a todos!
[ ]'s. Prof. Edson Lira, Me Estatístico Manaus-Amazonas
Em Quarta-feira, 31 de Janeiro de 2018 9:45, Edson Lira via R-br <r-br@listas.c3sl.ufpr.br> escreveu:
Bom dia caros amigos, tenho um pequeno problema que ainda não consegui encontrar a solução.
É o seguinte: Estou aplicando um questionário para avaliar a satisfação do cliente em um hospital público.
Na avaliação dos clientes estou usando uma escala de likert com as respostas para algumas questões.
ótimo, bom, regular, ruim, péssimo e não utilizou o serviço
Gostaria de fazer uma mudança nessas respostas usando uma rotina do R.
Gostaria de mudar da seguinte forma para todo o banco de uma única vez.
otimo e bom receberia o label "positiva" regular e não utilizou o serviço o label " " e ruim e péssimo receberia o label "negativa".
Alguém tem alguma sugestão?
Bom diae muito obrigado!!! Prof. Edson Lira, Me Estatístico Manaus-Amazonas ______________________________ _________________ 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 fornea cdigo mnimo reproduzvel. ______________________________ _________________ 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. -- ========================================= Fernando Souza Zootecnista, DSc. Produção e Alimentação Animal Celular: (31)99796-8781 (Vivo) E-mail:nandodesouza@gmail.com Lattes: http://lattes.cnpq.br/6519538815038307 Blog: https://producaoanimalcomr.wordpress.com/ ==========================================
participantes (4)
-
Edson Lira
-
Fernando Souza
-
Leonard Assis
-
Tiago Fragoso