R重新编码值

时间:2017-06-12 13:35:53

标签: r recode

我正在尝试重新编写一些调查回复。回复是文本,我想将它们重新编码为数字。但是,某些字符串不会被重新编码。我似乎无法找到为什么特定字符串(“plutôtinsatisfait”不会被重新编码为“3”)的原因。

View(VPFR_Q_raw)
table(VPFR_Q_raw$Q1)

   insatisfait             neutre   plutôt satisfait plutôt insatisfait          satisfait   très insatisfait 
            82                 96                229                 87                527                199 
très satisfait 
           528 

unique(VPFR_Q_raw$Q1)
[1] "insatisfait"        "satisfait"          "très insatisfait"   "très satisfait"     "plutôt satisfait"  
[6] "neutre"             "plutôt insatisfait"

VPFR_Q_raw$Q1[VPFR_Q_raw$Q1 == "très insatisfait"] <- 1
VPFR_Q_raw$Q1[VPFR_Q_raw$Q1 == "insatisfait"] <- 2
VPFR_Q_raw$Q1[VPFR_Q_raw$Q1 == "plutôt insatisfait"] <- 3
VPFR_Q_raw$Q1[VPFR_Q_raw$Q1 == "neutre"] <- 4
VPFR_Q_raw$Q1[VPFR_Q_raw$Q1 == "plutôt satisfait"] <- 5
VPFR_Q_raw$Q1[VPFR_Q_raw$Q1 == "satisfait"] <- 6
VPFR_Q_raw$Q1[VPFR_Q_raw$Q1 == "très satisfait"] <- 7

table(VPFR_Q_raw$Q1)

             1                  2                  4                  5                  6                  7 
           199                 82                 96                229                527                528 
plutôt insatisfait 
                87 

另一个没有奇怪迹象的例子: 它与Q1完美配合,但是当我使用相同的语法时,它不适用于Q2。

#Q1
unique(VPNL_Q_raw$Q1)

“tevreden”“eerder tevreden”“heel tevreden”“heel ontevreden”“neutraal”“ontevreden”“eerder ontevreden”

VPNL_Q_raw$QR1 <- recode(VPNL_Q_raw$Q1,"
'heel ontevreden'=1;
'ontevreden'=2;
'eerder ontevreden'=3;
'neutraal' = 4;
'eerder tevreden'=5;
'tevreden'=6;
'heel tevreden'=7")
table(VPNL_Q_raw$Q1,VPNL_Q_raw$QR1)

result Q1

#Q2
unique(VPNL_Q_raw$Q2)

“zeker wel”“wel”“zeker niet”“neutraal”“eerder wel”“eerder niet”“niet”

VPNL_Q_raw$QR2 <- recode(VPNL_Q_raw$Q2,"
'zeker niet'= 1;
'niet'= 2;
'eerder niet'= 3;
'neutraal'= 4;
'eerder wel'= 5;
'wel'= 6;
'zeker wel'= 7")
table(VPNL_Q_raw$Q2,VPNL_Q_raw$QR2)

result Q2

0 个答案:

没有答案