Неожиданные результаты с ddplyr в R

Question

Только начал использовать ddplyr {plyr} и у меня возникли следующие проблемы:

я создаю простой кадр данных:

require(plyr) 
df <- data.frame(day=c('monday', 'tuesday'), week=c(47,48)) 

Теперь, когда я запускаю это:

ddply(df, .(day), transform, 
    b = ifelse(week==47, week, day) 
) 

я получаю это:

 day week b 
1 monday 47 47 
2 tuesday 48 2 

В то время как я пытаюсь получить это:

 day week  b 
1 monday 47  47 
2 tuesday 48 tuesday 

Я думаю, что часть проблемы заключается в том, что я смешивания числовые и строковые переменные в одном столбце. Любая идея, как я могу получить свой предполагаемый результат? Благодаря!

Answer 1

Я удивлен, что вы не получили ожидаемых результатов, установив stringsAsFactors=FALSE ... Вот что я получаю:

require(plyr) 

df1 <- data.frame(day=c('monday', 'tuesday'), week=c(47,48), stringsAsFactors = TRUE) 
df2 <- data.frame(day=c('monday', 'tuesday'), week=c(47,48), stringsAsFactors = FALSE) 


ddply(df1, .(day), transform, 
    b = ifelse(week==47, week, day) 
) 

#  day week b 
# 1 monday 47 47 
# 2 tuesday 48 2 


ddply(df2, .(day), transform, 
    b = ifelse(week==47, week, day) 
) 

#  day week  b 
# 1 monday 47  47 
# 2 tuesday 48 tuesday 

Вы бы получить то же самое, если вы преобразовали фактор df1 таким образом:

df1$day <- as.character(df1$day) 
ddply(df1, .(day), transform, 
    b = ifelse(week==47, week, day) 
) 
#  day week  b 
# 1 monday 47  47 
# 2 tuesday 48 tuesday